changepass.asp

来自「呵呵」· ASP 代码 · 共 70 行

ASP
70 行
字号 
<!--#include file="articleconn.asp"-->
<%
if request.cookies("adminok")<>"ok" then
  response.redirect "login.asp"
end if
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改密码</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<link rel="stylesheet" type="text/css" href="style.css">

</head>
<body>
<div align="center"><center>
    <font face=楷体_gb2312 size=4>伊人留言密码管理页面</font> 
    <table border="1" width="80%" bordercolorlight="#000000" cellspacing="0" cellpadding="0"
bordercolordark="#FFFFFF">
      <%
dim rs,tsql
dim rst
	set rs=server.CreateObject("ADODB.RecordSet")
	set rst=server.CreateObject("ADODB.RecordSet")
	    rs.open "select * from admin",conn,1
%> 
      <tr> 
        <td width="50%" align=center><form name=pass method="post" action="changepass.asp"> 
          <font color=red>修改管理员信息</font></td>
        <td width="50%" rowspan="4">* 如点击修改后仍显示原来密码不用理会，密码已经按照您输入的修改，您可以用新密码登陆看看，或者点刷新选择重试，这时显示将正常！　</td>
      </tr>
      <tr> 
        <td width="50%" align="center"> 
          <INPUT TYPE="hidden" name=method value="chan">
          <INPUT TYPE="hidden" name=id value="<%=rs("id")%>">
          名字：
          <INPUT TYPE="text" size=10 NAME="name" value="<%=rs("username")%>">
          　</td>
      </tr>
      <tr> 
        <td width="50%" align="center">密码：
          <INPUT TYPE="password" size=10 NAME="pass" value="<%=rs("password")%>">
          　</td>
      </tr>
      <tr> 
        <td width="50%" align="center">
          <INPUT name="change" class=buttonface value="修改" type='submit'>
        </td>
</form>
      </tr>
      
      <!----------------------修改密码----------------------------> <%
rs.close
		if request("method")="chan" then 
		  if request("change")="修改" then
			rs.open "select * from admin where id="+request("id"),conn,1,3
				rs("username")=request("name")
				rs("password")=request("pass")
				rs.Update
				rs.close
		  end if 
		end if
%> <!----------------------------------------------------------> 
    </table>
    <a href="index.asp"><font size="4">（返回）</font></a> 
  </center>
</div>
</body>
</html>

changepass.asp - 源码说明

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

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

⌨️ 快捷键说明

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