📄 hf-ping.asp

📁 电子商务系统Easy_Buy是一个在线销售系统

💻 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='"&session("www.wygk.cn")&"'")
userid=rs("id")
rs.close
Set s= Server.CreateObject("abodb.recordset")
set rs = conn.execute("select userid from ping where id="&Request("id")&"")
userid2=rs("userid")
rs.close
set rs=nothing
if userid=userid2 then
Set s= Server.CreateObject("abodb.recordset")
conn.execute("Update ping set hf='"&request("hf")&"',zt=1 where id="&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>数字留言本</title>
<link href="../../css/css.css" rel="stylesheet" type="text/css">
</head>

<body>
<table width="350" height="200">
  <form name="form" method="post" action=?x=yes><tr>
      <td height="40" valign="middle">&nbsp;<font color="#FF3333" class="b2"><strong> 
        &gt;&gt;评论回复</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 + -