changepasswd.asp

诚信商店系统源代码

<%@LANGUAGE="VBScript"%>
<!--#include file="../public/wxl_conn.asp"-->
<!--#include file="../public/PublicFunction.asp"-->
<%
response.expires = 0

wxl=request("wxl")
MenuId=request("MenuId")


if wxl="ShowHtml" or wxl="" then
 dim sql1(15)
 ShowAddHtml sql1


elseif wxl="Modi_Ok" then
 OldPasswd=request("OldPasswd")
 NewPasswd=request("NewPasswd")
 Query="select * from web_SysOperators where int_sOperID="&UserInfo("int_sOleUserID")
 set sql=conn.Execute(Query)
 if sql("str_sOperLoginPwd")<>Encrypt(OldPasswd) then Back("旧密码错误,操作失败!")
 Query="Update web_SysOperators set str_sOperLoginPwd='"&Encrypt(NewPasswd)&"' where int_sOperID="&UserInfo("int_sOleUserID")
 conn.Execute(Query)
 %>
<script language='javascript'>
  alert('密码修改操作成功!');
  window.location.href = "<%=UrlFile%>";
</script>
<%

end if


sub ShowAddHtml(sql)
HtmlHead("修改"&UserInfo("str_sOleName")&"密码")
%>
<SCRIPT language=JavaScript>
  <!--
  function checkvalue() {
    aa=document.form1
    if (aa.OldPasswd.value=="") {
        window.alert ("请输入旧密码!"); aa.OldPasswd.focus();return false}
    if (aa.NewPasswd.value=="") {
        window.alert ("请输入新密码!"); aa.NewPasswd.focus();return false}
    if (aa.RePasswd.value != aa.NewPasswd.value) {
        window.alert ("密码确认不相同!"); aa.RePasswd.focus();return false}
     }
//-->
</SCRIPT>
<table border="1" width="450" cellpadding="3" cellspacing="0" bgcolor="#D6D3CE" bordercolordark="#FFFFFF" bordercolorlight="#808080" align="center" >
<form name=form1 action="<%=UrlFile%>" method="POST" onSubmit='return checkvalue();'>
                    <tr> 
                      <td align="right" width=80>旧&nbsp;密&nbsp;码：</td>
                      <td> 
                        <input type="password" name="OldPasswd" size="45" class=text2>
                      </td>
                    </tr>
                    <tr> 
                      <td align="right">新&nbsp;密&nbsp;码：</td>
                      <td> 
                        <input type="password" name="NewPasswd" size="45" class=text2>
                      </td>
                    </tr>
                    <tr> 
                      <td align="right" valign="top">确认密码：</td>
                      <td> 
                        <input type="password" name="RePasswd" size="45" class=text2>
                      </td>
                    </tr>
                  </table>
          <table border="0" width="100%" cellspacing="0" cellpadding="0" bgcolor="#D6D3CE">
            <tr>
              <td height="6"></td>
            </tr>
            <tr>
              <td height="2" align="center">
			  <input type="submit" value="  修 改" name="B1" class="submit" style="width:60; height:25;">&nbsp;&nbsp;  
                &nbsp; <input type="reset" value="  返 回" name="B2" class="submit" style="width:60; height:25;" onClick="history.back();"></td> 
            </tr>
            <tr>
              <td height="6"></td>
            </tr>
          </table>
          <input type=hidden name="Issuer" value=<%=Issuer%>>
          <input type=hidden name="wxl" value="Modi_Ok">
          <input type=hidden name="MenuId" value=<%=MenuId%>>
</form>
<%
HtmlEnd
end sub
%>