comment.asp

来自「凡人网络购物系统 v8.0 中文版」· ASP 代码 · 共 17 行

<!--#include file="conn.asp"-->
<%hw_id=request("id")
set rs=server.createobject("adodb.recordset")
if commentshow=1 then
sql="select top 10 * from venshop_comment where dateid="&hw_id&" order by id desc"
else
sql="select top 10 * from venshop_comment where dateid="&hw_id&" and c_c=1 order by id desc"
end if
rs.open sql,conn,1,1
do while not rs.eof%>
document.write('<p style="line-height: 120%; margin: 5px">发言：<a href="mailto:<%=rs("Mail")%>"><%=rs("Mail")%></a>&nbsp;&nbsp;&nbsp;&nbsp; 日期：<%=rs("date")%><br>');
document.write('内容：<%=replace(rs("Comment"),vbcrlf,"&nbsp;")%><br><font color="#008000">回复： <%=replace(rs("adminfu"),vbcrlf,"&nbsp;")%></font>');
document.write('<br>');
<%rs.movenext  
loop  
rs.close
set rs=nothing%>