changepass.asp
来自「online sales system of texttile mill was」· ASP 代码 · 共 34 行
ASP
34 行
<!-- #include file="conn.asp" -->
<html>
<head>
</head>
<body bgcolor="">
<center>
<br><br><br>
<FONT face=Georgia color=#cc0033 size=2><b>Welcome Administrator</font><br><br>
<%
opass = request.form("opass")
pass = request.form("pass")
Set oRs = Server.CreateObject("ADODB.RecordSet")
SQL = "select password from users where password='"&opass&"'"
oRs.open SQL,objcon,2,3
if oRs.EOF then
response.write "your old password doesn't match"
else
ors("password") = pass
ors.update
response.write "<Font face=Tahoma size=2>Password changed successfully</Font><br><br>"&_
"<Font face=Tahoma size=1><a href=admin_options.asp>Go to options page</a></Font>"
end if
oRs.close
Set oRs = nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?