⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 userok.asp

📁 wapgo网址导航整站源码,WAP源码,更多登陆http://xywap.cn
💻 ASP
字号:
<%@ Language=VBScript %>
<!--#include file="conn.asp"-->
<%
  if session("admin")="" then
  response.redirect "admin.asp"
  end if

   old=LCase(Request("old"))
   pin=Request("pw")
   manager=LCase(Request("username"))
   newpin=Request("password")

  if newpin=pin then

   set rs = server.createobject("adodb.recordset")
   sql="select * from admin where username='"&old&"'"
   rs.open sql,conn,3,3
	 rs("username")=manager
	 rs("password")=newpin
	 rs.update
	 rs.close
	 set rs=nothing
   
         conn.Close
         set conn=Nothing        
%>
<html>
<head>
<title>操作成功</title>
<meta http-equiv="refresh" content='2; URL=user.asp'>
</head>
<body>
<p align="center"><b>管理员信息修改成功!</b></p>
</body>
</html>
<%else%>
<html>
<head>
<title>操作失败</title>
<meta http-equiv="refresh" content='2; URL=user.asp'>
</head>
<body>
<p align="center"><b>两次输入密码不一致,正在返回!</b></p>
</body>
</html>
<%end if%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -