BVB Source Codes

Jie Yang v0.6.3 article system Show AjaxComment.asp Source code

Return Download Jie Yang v0.6.3 article system: download AjaxComment.asp Source code - Download Jie Yang v0.6.3 article system Source code - Type:.asp
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
  2. <!--#include file="../conn/conn.asp" -->
  3. <!--#include file="../inc/commoncode.asp" -->
  4. <%
  5. Call CloseSite()
  6. If JY_Sql = True then Call SQLin()
  7. newsid=Request.QueryString("id")
  8. if newsid<>"" and Isnumeric(newsid) and SiteComment=1 then
  9.         Response.CharSet = "gb2312"
  10.         Response.ContentType = "text/xml"
  11.         sqlpl="Select Top 10 * from Article_Comment where C_nid="&newsid&" and c_flag=1 order by C_addtime desc"
  12.         set rspl=Server.CreateObject("ADODB.RecordSet")
  13.         rspl.open sqlpl,conn,1,1
  14.         if not rspl.eof then
  15.         InfoCommentList="<table border='0' cellspacing='5' cellpadding='1' align='center' style=' width:698px; border:1px #8AD6F0 solid;'>"
  16.         InfoCommentList=InfoCommentList&"<tr><td bgcolor='#E2F8FE' class='pltit'><span><a href='#pl'>发表评论</a></span>评论列表</td></tr>"
  17.         for i=1 to rspl.recordcount
  18.                 InfoCommentList=InfoCommentList&"<tr><td bgcolor='#E2F8FE'><img src='"&InstallDir&"skin/default/pl.gif' width='16' height='16' /> "&rspl("C_name")&" <font color='#999999'>时间:"&rspl("C_addtime")&" 来自:"&rspl("C_ip")&"</font></td></tr>"
  19.                 InfoCommentList=InfoCommentList&"<tr><td bgcolor='#E2F8FE' style='border-bottom:1px #CCCCCC dashed;'>"&rspl("C_content")&"</td></tr>"
  20.         rspl.movenext
  21.         next
  22.         InfoCommentList=InfoCommentList&"</table>"
  23.         end if
  24.         closers(rspl)
  25.         Response.Write InfoCommentList
  26. else
  27.         Response.Write ""
  28. end if
  29. %>
downloadAjaxComment.asp Source code - Download Jie Yang v0.6.3 article system Source code
Related Source Codes/Software:
Jilin classification information release system v5.0 trial version - A ready-made classifieds site publishing system, h... 2016-09-21
Linyi CMS v6.5 market classification information - A. supply and demand information function: informa... 2016-09-21
Tesco discount net SQL version - And presentations, faster. 2016-09-21
- electronic enterprise website management system In a fully functional version - Super suitable for enterprise agents build a corpo... 2016-09-21
Rio mesh network hard disk system v3.0 - System functions: 1, increase the progress of Asp... 2016-09-21
Classified information network business in suzhou - Overall module: classification of supply and deman... 2016-09-21
NPOINT virtual host v1.7.0 formal version management system - The system main function is introduced 2016-09-21
IDC sales web site - Beautiful IDC sales web site source code 2016-09-21
Oo 126 CMS movie site system - This procedure ASP + ACC/ASP + SQL, using new kern... 2016-09-21
Pcook CMS bubble guest v3.0 SDCMS version - Developed by Asp+Access, and meet the needs of sma... 2016-09-21
CRYENGINE - CRYENGINE is a powerful real-time game development... 2017-06-11
postal - 2017-06-11
reactide - Reactide is the first dedicated IDE for React web ... 2017-06-11
rkt - rkt is a pod-native container engine for Linux. It... 2017-06-11
uWebSockets - Tiny WebSockets https://for... 2017-06-11
realworld - TodoMVC for the RealWorld - Exemplary fullstack Me... 2017-06-11
goreplay - GoReplay is an open-source tool for capturing and ... 2017-06-10
pyenv - Simple Python version management 2017-06-10
redux-saga - An alternative side effect model for Redux apps ... 2017-06-10
angular-starter - 2017-06-10

 Back to top