📄 responsesave.asp
字号:
<!--#include file="../conndb.asp"-->
<!--#include file="isUser.asp"-->
<html>
<head>
<title>保存回复信息</title>
</head>
<body>
<%
Function changechr(str)
changechr = Replace(str," "," ")
changechr = Replace(changechr,Chr(13),"<br>")
changechr = Replace(changechr,"'","‘")
End Function
id = Request.QueryString("aid")
Set rs = Server.CreateObject("ADODB.RECORDSET")
sql = "Select * From Application Where AppId=" &id
rs.Open sql,Conn,1,3
rs("Response") = changechr(Request("content"))
rs("RspDate") = Date()
rs.Update
Response.Write "<h3>成功保存</h3>"
Set rs = Nothing
%>
</body>
<script language="javascript">
// 刷新父级窗口,延迟此关闭
opener.location.reload();
setTimeout("window.close()",600);
</script>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -