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

📄 edit_pws.asp

📁 不错的ASP整站源代码。在IIS环境下运行都没有问题
💻 ASP
字号:
<!--#include file="../checkuser.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>智能网站-倚锋科技-智能网站</title>
<%   if Request.ServerVariables("HTTP_METHOD")="POST" then
          username=Request.Form("username")
          password=Request.Form("password")
          set fs=server.CreateObject("Scripting.FileSystemObject")
          Set f = fs.OpenTextFile(server.MapPath("../include/userpw.asp"), 2, True)
          f.writeline "<%"
          f.writeline "P_username=" & chr(34) & username & chr(34)
          f.writeline "P_password=" & chr(34) & password & chr(34)
          f.writeline chr(37) & ">" 
          f.close
          set f=nothing
          set fs=nothing
          session("logusername")=username
          session("logpassword")=password
          edit_ok         
          
      end if          
  

%>
<%sub edit_ok()%>
<script language="javascript">
  alert("您的用户名与密码已成功修改!");
  document.location.href="../main.asp";
</script>
<%end sub%>

<script language="javascript">
function checkform(){
  if (document.form1.username.value==""){
      alert("请输入新用户名,并不能为空!");
      document.form1.username.focus();
      return false;
  }
  
  if (document.form1.password.value==""){
      alert("请输入新密码!");
      document.form1.password.focus();
      return false;
  }
  
  if (document.form1.username.value.length<6 || document.form1.password.value.length<6){  
      alert("为了网络安全,请输入6位以上的用户名和密码!");
      document.form1.username.value="";
      document.form1.password.value="";
      document.form1.password1.value="";
      return false;
      
  }
  
  if (document.form1.password1.value!=document.form1.password.value){
      alert("您输入的密码不一致!");
      document.form1.password1.focus();
      document.form1.password1.value="";
      return false;   
  }
      
  if (confirm("您真的要修改密码吗?")==false){
      document.location.href="../main.asp";
      return false;}
  else
      return true;        

}
</script>
<link href="../include/styles.css" rel="stylesheet" type="text/css">
</head>

<body bgcolor="#ffffff" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br><br>
<table width="200" border="1" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><table width="570" border="0" cellspacing="0" cellpadding="5" height="151" bordercolorlight="#000000" bordercolordark="#FFFFFF" class=box align="center">
              <form name="form1" method="post" action="edit_pws.asp" class="p9" onsubmit="javascript:return checkform();">
          <tr bgcolor="#3366cc"> 
                  
            <td height="25" bgcolor="225597"> 
              <div align="center" ><span style="font-size:14.9px"><b><font color="#FFffff">修 
                改 管 理 员 帐 号</font></b></span></div>
            </td>
          </tr>                
          <tr> 
            <td height="32"> 
              <div align="center"><span class="p9">新用户名: </span> 
                <input type="text" name="username" size=30 class="box" >
              </div>
            </td>
          </tr>
          <tr height="32"> 
            <td> 
              <div align="center"><span class="p9">新  密  码: </span> 
                <input type="password" name="password" size=30 class="box" >
              </div>
            </td>
          </tr>
          <tr height="32"> 
            <td> 
              <div align="center"><span class="p9">验证密码: </span> 
                <input type="password" name="password1" size=30 class="box" >
              </div>
            </td>
          </tr>
          <tr height="37"> 
            <td> 
              <div align="center"> 
                <input type="submit" name="Submit" value="  保存  " class="p9">
                &nbsp;&nbsp;&nbsp;&nbsp; 
                <input type="reset" name="close" value="  取消  " class="p9">
              </div>
            </td>
          </tr>
        </form>
      </table></td>
  </tr>
</table>

</body>
</html>

⌨️ 快捷键说明

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