📄 reply.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="check.asp"-->
<%
on error resume next
set rs = server.createobject("adodb.recordset")
sql = "select * from config"
rs.open sql,conn,1,1
if date <> idate then
rs("today") = 0
end if
rs("date") = date
rs.update
rs.close
if session("admin") <> "admin" then
response.redirect "../admin/index.asp"
response.end
else
iaction = request.form("action")
if iaction = "reply" then
icontent = inohtml(request.form("content"))
itopic = request.form("topic")
itime = now
if icontent = "" or itopic = "" or itime = "" then
ierror = "数据内容不得为空"
end if
if ierror = "" then
sql = "select * from reply"
rs.open sql,conn,3,2
rs.addnew
rs("content") = icontent
rs("topic") = itopic
rs("time") = itime
rs.update
rs.close
response.redirect "index.asp"
response.end
end if
end if
end if
set rs = nothing
%>
<html>
<head>
<!--- The site is designed by Wind Song Studio --->
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="author">
<meta name="description" >
<meta name="keywords" >
<link href="style.css" rel="stylesheet" type="text/css">
<title><%=ititle%></title>
<base target="_blank">
</head>
<body background="../img/dnacebg2.jpg" topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="800">
<tr>
<td width="100"> </td>
<td width="600" bgcolor="#cea772"> <img border="0" src="images/main/top.jpg"></td>
<td width="100"> </td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="800" height="100%">
<tr>
<td width="100"> </td>
<td width="600" bgcolor="#e4c59a" valign="top">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="580">
<tr>
<td width="5%" align="center">
<img border="0" src="images/main/now.gif"></td>
<td width="40%">
<p style="margin-top: 2"><a href="<%=iurl%>"><%=ihomepage%></a><span style="font-size: 6pt">>></span>回复留言</td>
<td width="30%" align="center">
<a href="new.asp">
<img border="0" src="images/main/new.jpg"></a></td>
<td width="30%" align="center">
<a href="index.asp">
<img border="0" src="images/main/list.jpg"></a>
<a href="manage.asp"> </a></td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="5" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="590">
<tr><td>
<table border="0" cellpadding="2" cellspacing="1" style="border-collapse: collapse; border-style: solid; border-width: 1" bordercolor="#86540c" width="100%" id="AutoNumber1">
<form name="ireply" method="post" action="reply.asp" target="_self">
<tr><input type="hidden" name="topic" value="<%=request("id")%>">
<td width="100%" colspan="2" bgcolor="<%=icolor1%>"><p align="center" style="margin-top: 2"><b><font color="#800000"><%=ierror%></font></b> </td>
</tr>
<tr>
<td width="20%" bgcolor="<%=icolor2%>" align="center">
<p align="center" style="margin-top: 2"><font color="#800000">回复内容</font></td>
<td width="80%" bgcolor="<%=icolor2%>">
<textarea rows="5" name="content" cols="100" style="width: 200; color: #86540c"></textarea></td>
</tr>
<tr>
<td width="20%" bgcolor="<%=icolor3%>" align="center"> </td>
<td width="80%" bgcolor="<%=icolor3%>">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="30%" id="AutoNumber4">
<tr><input type="hidden" name="action" value="reply">
<td width="50%">
<a target="_self" href="javascript:document.ireply.submit()"><img border="0" src="images/main/ok.gif"></a></td>
<td width="50%">
<a target="_self" href="javascript:document.ireply.reset()"><img border="0" src="images/main/cancel.gif"></a></td>
</tr>
</table>
</td>
</tr>
</table>
</td></tr>
</form>
</table>
</center>
</div>
</td>
<td width="100"> </td>
</tr>
</table>
</center>
</div>
</body>
</html>
<%
conn.close
set conn = nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -