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

📄 changepass.asp

📁 ASP会员注册管理系统 主要用于ASP实现会员注册
💻 ASP
字号:
<!--#include file="setup.asp" -->
<!--#include file="conn.asp" -->
<%
Response.Expires=0
if request("b1")=empty then
%>
<html>
<head>
<title>管理员密码更改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body bgcolor="#FFFFFF">
<table width="499" border="0" cellspacing="0" cellpadding="0" align="center" height="21">
  <tr> 
    <td><img src="image/home.gif" width="16" height="16"> <a href="<%=homepage%>"> 
      回主页</a> &gt;&gt; <%=proname%> &gt;&gt; 更改管理密码</td>
  </tr>
</table>
<form method="post" action="changepass.asp" name="reg">
  <table border=1 cellpadding=5 cellspacing=0
width="501" align="center" bordercolor="#999999" bgcolor="#FFCC99" bordercolorlight="#000000" bordercolordark="#FFFFFF">
    <tr> 
      <td align=middle 
width=483> 
        <p align="center"><font color="#FF0000">更改管理密码&nbsp;</font></p>
      </td>
    </tr>
    <tr> 
      <td align=middle 
width=483 height="25"> 
        <div align="center">带 &quot;<font color="#FF3333">*</font>&quot; 的为必填选项,注意不要使用空格符</div>
      </td>
    </tr>
    <tr> 
      <td align=middle 
width=483> <br>
        <table width=100% border=0 cellspacing=0 cellpadding=6 bgcolor="#bbbbbb">
          <tr> 
            <td width=30% class=link  align="right">管理员名称:</td>
            <td width=70%> 
              <input type=text name=username size=20 maxlength=20 class=link>
              <font color="#FF3333">*</font> 字母或数字</td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">旧 密 码:</td>
            <td width=70%> 
              <input type=text name=password size=20 maxlength=20 class=link>
              <font color="#FF3333">*</font> 字母或数字</td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">新 密 码:</td>
            <td width=70%> 
              <input type=text name=password2 size=20 maxlength=20 class=link>
              <font color="#FF3333">*</font> 字母或数字</td>
          </tr>
          <tr> 
            <td width=30% class=link  align="right">确认密码:</td>
            <td width=70%> 
              <input type=text name=password3 size=20 maxlength=20 class=link>
            </td>
          </tr>
        </table>
        <br>
      </td>
    </tr>
    <tr> 
      <td align=middle 
width=483> 
        <div align="center"> 
          <input type="submit" value="填好了,继续!" name="b1">
            
          <input type="reset" name="Reset" value="重新填写">
        </div>
      </td>
    </tr>
    <tr> 
      <td align=middle 
width=483> 
        <div align="left">
          <p>注意事项:<br>
            <br>
            1、不得将本系统用于任何包含色情、非法、以及危害国家安全的场所. <br>
            <br>
            2、以上规则违者责任自负,本站有权追究其法律责任。</p>
          <p>3、您可以免费使用本系统,但必需保留本站链接.</p>
        </div>
      </td>
    </tr>
    <tr> 
      <td align=middle 
width=483> 
        <div align="center">程序制作:<a href="http://www.soonhost.com" target="_blank"><b>迅捷主机网</b></a></div>
      </td>
    </tr>
    <tbody> </tbody> 
  </table>
</form>
<p>&nbsp;</p>
</body>
</html>
<%
response.end
end if

username=trim(replace(request("username"),"'",""))
password=trim(replace(request("password"),"'",""))
password2=trim(replace(request("password2"),"'",""))
password3=trim(replace(request("password3"),"'",""))

for i=1 to len(username)
user=mid(username,i,1)
if user="'" or user="%" or user="<" or user=">" or user="&" or user="|" then
response.write "<script language=JavaScript>" & "alert('您的用户名含有非法字符,请重新输入!');" & "history.back()" & "</script>"
response.end
end if
next
for i=1 to len(password)
pass=mid(password,i,1)
if pass="'" or pass="%" or pass="<" or pass=">" or upass="&" or pass="|" then
response.write "<script language=JavaScript>" & "alert('您的密码含有非法字符,请重新输入!');" & "history.back()" & "</script>"
response.end
end if
next


for i=1 to len(password2)
pass=mid(password2,i,1)
if pass="'" or pass="%" or pass="<" or pass=">" or upass="&" or pass="|" then
response.write "<script language=JavaScript>" & "alert('您的密码含有非法字符,请重新输入!');" & "history.back()" & "</script>"
response.end
end if
next
for i=1 to len(password3)
pass=mid(password3,i,1)
if pass="'" or pass="%" or pass="<" or pass=">" or upass="&" or pass="|" then
response.write "<script language=JavaScript>" & "alert('您的密码含有非法字符,请重新输入!');" & "history.back()" & "</script>"
response.end
end if
next

set rs=server.createobject("adodb.recordset")
Sql="Select * from admin"
Rs.Open Sql,Conn,1,3
If Rs("username")<>username Then response.write "<script language=JavaScript>" & chr(13) & "alert('您不是管理员不能进入!');" & "history.back()" & "</script>"
If Rs("password")<>password Then response.write "<script language=JavaScript>" & chr(13) & "alert('您输入的密码不正确!');" & "history.back()" & "</script>"
if password2 <>password3 then response.write "<script language=JavaScript>" & chr(13) & "alert('您确认您两次输入的密码是否一致!');" & "history.back()" & "</script>"
Rs("password")=password2
Rs.Update
Response.Write "<html><body><center>更改成功!<p>"
Response.Write "</center></body></html>"
Rs.Close
Conn.Close
Set Rs=Nothing
Set Conn=Nothing
'====================================================
'迅捷主机网 ------ 首选域名、虚拟主机、企业邮局提供商
'网址:http://www.soonhost.com
''EMAIL:sell@china.com
'msn:soonhost@hotmail.com
'oicq: 123150745
'本站还提供大量脚本下载,负责安装;脚本定制价格低廉.
'程序为免费程序,您可以使用本程序,但必须 
'保留迅捷主机网(http://www.soonhost.com)的链接!
'====================================================
%>

⌨️ 快捷键说明

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