📄 reply.asp
字号:
<!--#include file="pass.asp "-->
<!--#include file="conn.asp"-->
<!--#include file="char.asp"--><head>
<meta http-equiv="Content-Language" content="zh-cn">
<LINK href="image/css.css" type=text/css rel=stylesheet>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
-->
</style></head>
<%
sql="select * from guest_topic where id="&request("id")
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,3
id=rs("user_id")
%>
<%
sql2="select * from guest_reply where topic_id="&request("id")
Set rs2=Server.CreateObject("ADODB.RecordSet")
rs2.open sql2,conn,1,3
dim i
i=1
%>
<body>
<center>
<table border="0" width="600" cellspacing="1" id="table1" bgcolor="#C0C0C0">
<tr>
<td bgcolor="#FFCC99" colspan="2"><%=conn.execute("select * from [user] where id="&id)("name")%> 发表于 <%=rs("time")%> 楼主</td>
</tr>
<tr><td bgcolor=#ffffff colspan=2>主题：<%=rs("title")%></td></tr>
<tr><td bgcolor=#ffffff height=100 valign=top width=100>
<%RndNum=Int(Rnd()*(22-1+1))+1%>
<img src=img/<%=RndNum%>.gif>
</td>
<td bgcolor=#ffffff height=100 valign=top>留言：<%=rs("content")%> </td></tr>
</table>
<br>
<% if rs2.eof then %>
<table width=600>
<tr><td>暂时没有回复！</td></tr></table>
<% else
Do while not rs2.eof
id2=rs2("user_id")%>
<table border="0" width="600" cellspacing="1" id="table1" bgcolor="#CFCDC9">
<tr><td width=20%>回复人：<%=conn.execute("select * from [user] where id="&id2)("name")%>/td>
<td width=40% ><%=rs2("time")%></td>
<td ><%=i%>楼</td></tr>
<tr><td bgcolor="#FFFFFF" >
<%RndNum=Int(Rnd()*(22-1+1))+1%>
<img src=img/<%=RndNum%>.gif>
</td><td bgcolor="#FFFFFF" colspan=2 valign=top>回复内容：<%=rs2("content")%> </td></tr>
</table><br>
<% rs2.movenext
i=i+1
loop
end if
rs2.close
set rs2=nothing
%>
<form action=reply_add.asp?id=<%=request("id")%> method=post>
<table border="0" width="600" cellspacing="1" id="table1" bgcolor="#C0C0C0">
<tr>
<td bgcolor="#FFFFFF" background="../image/dj_bg.gif">
回复留言</td>
</tr>
<tr><td bgcolor="#FFFFFF"> 回复内容：<br>
<textarea name=Content rows="7" cols="51" style="border: 1px dotted #000000"></textarea><br>
<input type=submit value=提交>
</td></tr>
</table>
</form>
</center>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -