|
"><%=left(rs("Content"),25)%> |
评分:<%=rs("Score")%> |
<%if rs("UserType")=1 then response.write "会员" else response.write "游客" end if%> |
<%
if rs("UserType")=1 then
set rsCommentUser=Conn_User.execute("select " & db_User_ID & "," & db_User_Name & "," & db_User_Email & "," & db_User_QQ & "," & db_User_ICQ & "," & db_User_Msn & "," & db_User_Homepage & " from " & db_User_Table & " where " & db_User_Name & "='" & rs("UserName") & "'")
if rsCommentUser.bof and rsCommentUser.eof then
response.write rs("UserName")
else
response.write "" & rs("UserName") & ""
end if
else
response.write "" & rs("UserName") & ""
end if
%>
|
<%= rs("WriteTime") %> |
<%
if rs("ReplyName")<>"" then
response.write " "
else
response.write "回复 "
end if
response.write "修改 "
response.write "删除"
%>
|
<%if rs("ReplyName")<>"" then%>