userok.asp

来自「wap建站」· ASP 代码 · 共 46 行

ASP
46 行
字号 
<%@ 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%>

userok.asp - 源码说明

本页面展示了「wap建站」中的 userok.asp 源码文件，采用 ASP 编程语言编写，共 46 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与WAP建站相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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