📄 hf.asp
字号:
<!--#include file="0.asp"-->
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../conn/nosql.asp"-->
<%if request("x")="yes" then
Set s= Server.CreateObject("abodb.recordset")
set rs = conn.execute("select id from user_name where name='"&nosql(session("www.wygk.cn"))&"'")
userid=rs("id")
rs.close
Set s= Server.CreateObject("abodb.recordset")
set rs = conn.execute("select userid from user_guestbook where id="&clng(Request("id"))&"")
userid2=rs("userid")
rs.close
if userid=userid2 then
Set s= Server.CreateObject("abodb.recordset")
conn.execute("Update user_guestbook set hf='"&nosql(replace(request("hf"),"'",""))&"',sj='"&now()&"' where id="&clng(Request("id"))&"")
Response.write "<script>alert(""回复成功,为防止误操作,所有留言必须审核后才能在网站前台显示!"");window.close();window.opener.location.reload();</script>"
else
Response.write "<script>alert(""对不起,你不能修改该条信息。"");window.close();window.opener.location.reload();</script>"
end if
end if
%><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>onshp留言本________________http://www.wygk.cn</title>
<link href="../../css/css.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="330" height="190" cellpadding="0" cellspacing="0">
<form name="form" method="post" action=hf.asp?x=yes><tr>
<td height="40" valign="middle"> <font color="#FF3333" size="3"><strong> >>留言回复</strong></font></td>
</tr>
<tr>
<td align="center" valign="middle"><textarea name="hf" cols="50" rows="8" class="wenbenkuang" id="hf"></textarea></td>
</tr>
<tr>
<td height="40" align="center" valign="middle">
<input name="Submit" type="submit" class="go-wenbenkuang" value="提交">
<input name="Submit" type="reset" class="go-wenbenkuang" value="重置">
<input name="Submit" type="button" class="go-wenbenkuang" value="关闭窗口"onClick="javascript:self.close();">
<input name="id" type="hidden" id="id" value="<%=request("id")%>"> </td>
</tr></form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -