📄 savereply.asp
字号:
<%@ Language=VBScript %>
<!--#INCLUDE FILE="conn.asp" -->
<!--#INCLUDE FILE="config.asp" -->
<%
user=trim(request("username"))
passwd=cstr(Request("password"))
if passwd=username and user=password then
reply=request("txtreply")
replytime=now()
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from iZzgbook where gbookid="&request("gbookid")
rs.open sql,conn,1,3
rs("reply")=reply
rs("rltime")=replytime
rs.update
rs.close
set rs=noting
conn.close
set conn=nothing
response.redirect "index.asp"
else
response.write "<link rel='stylesheet' type='text/css' href='../style/style.css'>"
response.write "<body bgcolor='#ffffff'>"
response.write "<P align=center><font color=#ff0000>Sorry,请输入正确的管理员名字和密码</font>"
response.end
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -