<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from w163_review where bookid="&request("id")&" order by pinglundate desc",conn,1,1
j=rs.recordcount
plcount=rs.recordcount
if j>3 then j=3
for i=1 to j
%>
| 主题： <%=trim(rs("pingluntitle"))%> |
 .gif"> |
| 作者： <%=trim(rs("pinglunname"))%> (<%=trim(rs("pinglundate"))%>) |
<%=trim(rs("ip"))%> |
| 内容：
<%if len(rs("pingluncontent"))>204 then
response.write left(rs("pingluncontent"),200)&"... [详细内容]"
else response.write rs("pingluncontent")
end if%>
|
<%if trim(rs("huifu"))<>"" then%>
| 销售商回复：<%=rs("huifu")%> |
<%end if%>
|
|
|
<%
rs.movenext
next
if plcount>0 then
%>
| >浏览该商品的全部<%=plcount%>条评论>> |
<%end if%>