📄 reply.asp
字号:
<%@ language="vbscript" %>
<!--#include file="adovbs.inc"-->
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open Application("DBCon_ConnectionString")
sql="update forum set hitnumber=hitnumber+1 where id='"&request("id")&"'"
conn.execute sql
set rs=server.createobject("adodb.recordset")
sqltext="select * from forum where id='"&request("id")&"'"
rs.open sqltext,conn,adOpenkeyset,adlockoptimistic,adcmdtext
%>
<html>
<head>
<style type="text/css">
<!--
A{text-decoration:none}
A:hover {color:#ee9c00;; text-decoration: underline}
td { font-size: 9pt}
--></style>
<title>回复信息</title>
<link rel="stylesheet" href="../html/3508.css">
</head>
<body BGCOLOR="#FFFFFF" text="#000000" link="#000080" vlink="#000080">
<b><div align="center"><center>
<table border="0" width="95%">
<tr>
<td align="left" valign="top"> <br>
</td>
</tr>
</table>
</center></div>
<div align="center">
<table width="95%" bgcolor="#eff5f3" border="0" cellpadding="10" cellspacing="0">
<tr>
<td width="100%" valign="top">
<div align="center"><table border="0" width="100%" cellpadding="0" bgcolor="#ACC4B0">
<tr>
<td width="100%">
<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript"><!--
function FrontPage_Form1_Validator(theForm)
{
if (theForm.comment.value.length > 1000)
{
alert("Please enter at most 1000 characters in the \"comment\" field.");
theForm.comment.focus();
return (false);
}
return (true);
}
//--></script><!--webbot BOT="GeneratedScript" endspan --><form ACTION="response.asp" METHOD="POST" onsubmit="return FrontPage_Form1_Validator(this)" name="FrontPage_Form1">
<input type="hidden" name="action" value="postreply">
<input type="hidden" name="number" value="4">
<input type="hidden" name="topic" value="000382-00-00-00-00-00-00-00-00-00-00-00-00-00-00-00-073199-002.msg">
<input type="hidden" name="Browser" value>
<input type="hidden" name="HTMLAllowed" value>
<input type="hidden" name="id" value="<% =rs("id") %>">
<input type="hidden" name="child" value="<% =rs("child") %>">
<input type="hidden" name="xl" value="<% =rs("xl") %>">
<table border="0">
<tr>
<td><font color="#000080">用户*:</font> <input NAME="username" VALUE SIZE="25" MAXLENGTH="25"> </td>
</tr>
<tr>
<td><font color="#000080">题目*:<input NAME="title" VALUE="Re: <% =rs("title") %>" SIZE="45" MAXLENGTH="45"> </font></td>
</tr>
<tr>
<td valign="top"><font color="#000080">回复内容:</font></td>
</tr>
<tr>
<td><!--webbot bot="Validation" I-Maximum-Length="1000" --><textarea NAME="comment" ROWS="6" COLS="50" WRAP="VIRTUAL"></textarea>
</td>
</tr>
</table>
<table cellspacing="1" cellpadding="1">
<tr>
<td width="400" colspan="3">表情：</td>
</tr>
<tr>
<td nowrap><input type="radio" value="0" name="brow"><img src="browimage/0.gif" alt="随便说说啦" width="15" height="15">随便说说啦</td>
<td nowrap><input type="radio" value="1" name="brow" checked><img src="browimage/1.gif" alt="我来回答你。" width="15" height="15">我来回答你</td>
<td nowrap><input type="radio" value="2" name="brow"><img src="browimage/2.gif" alt="号外！号外！" width="15" height="15">号外！号外！</td>
<td nowrap><input type="radio" value="3" name="brow"><img src="browimage/3.gif" alt="好奇怪哟！" width="15" height="15">好奇怪哟！</td>
</tr>
<tr>
<td nowrap><input type="radio" value="4" name="brow"><img src="browimage/4.gif" alt="大家过来.." width="15" height="15">.大家过来.</td>
<td nowrap><input type="radio" value="5" name="brow"><img src="browimage/5.gif" alt="大家小心！" width="15" height="15">大家小心！</td>
<td nowrap><input type="radio" value="6" name="brow"><img src="browimage/6.gif" alt="我得意的笑^_^" width="15" height="15">我得意的笑</td>
<td nowrap><input type="radio" value="7" name="brow"><img src="browimage/7.gif" alt="没劲！" width="15" height="15">没劲！</td>
</tr>
<tr>
<td nowrap><input type="radio" value="8" name="brow"><img src="browimage/8.gif" alt="气死我了！" width="15" height="15">气死我了！</td>
<td nowrap><input type="radio" value="9" name="brow"><img src="browimage/9.gif" alt="坚决同意！" width="15" height="15">坚决同意！</td>
<td nowrap><input type="radio" value="10" name="brow"><img src="browimage/10.gif" alt="反对反对！" width="15" height="15">反对反对！</td>
<td nowrap><input type="radio" value="11" name="brow"><img src="browimage/11.gif" alt="管它呢:--{" width="15" height="15">管它呢:--{</td>
</tr>
</table>
<div align="center"><center><p><input TYPE="submit" NAME="SUBMIT" VALUE="回应该文章">
<input TYPE="RESET" NAME="RESET" VALUE="清除"> </p>
</center></div>
</form>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</div>
<form method="POST" action="delete.asp">
<input type="hidden" name="action" value="dell">
<input type="hidden" name="number" value="4">
<input type="hidden" name="topic" value="000382-02-00-00-00-00-00-00-00-00-00-00-00-00-00-00-080199-100.msg">
<input type="hidden" name="Browser" value>
<input type="hidden" name="id" value="<% =rs("id") %>">
<table border="0" width="600">
<tr bgcolor="#D5E6E1">
<td width="22">账号:</td>
<td width="210"><input type="text" name="adm" size="20"></td>
<td width="22">密码:</td>
<td width="190"><input type="password" name="pw" size="20"></td>
<td width="16"></td>
<td width="116">
<p>
<input type="submit" value="删去该贴子">
</td>
</tr>
</table>
</form>
<% rs.close
conn.close
%>
</b>
<!-- #include file="../include/end.htm" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -