PassMod.asp 4.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103
  1. <%Session.CodePage=65001%>
  2. <html>
  3. <head>
  4. <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
  5. <title>BdeCMS网站后台管理登陆</title>
  6. <meta name="Keywords" content="网站后台管理系统,网站内容管理系统,asp网站后台管理系统,西安网站建设,西安网络公司" />
  7. <link rel="stylesheet" type="text/css" href="../bdcommx/css.css">
  8. </head>
  9. <body>
  10. <!--#include file="../bdcommx/connxyz.asp"-->
  11. <!--#include file="../bdcommx/jsall.asp"-->
  12. <%call log_chk()%>
  13. <%if request("act")="mod" then
  14. dim user,pwd,Tname,tel
  15. user=trim(request("UserName"))
  16. olduser=trim(request("olduser"))
  17. pwd=request("PassWord")
  18. rpwd=request("rPassWord")
  19. Tname=request("Tname")
  20. tel=request("tel")
  21. if pwd<>rpwd then
  22. response.Write"<script language='javascript'>alert('两次密码输入不一致');history.go(-1);</script>"
  23. response.End()
  24. end if
  25. pwd=md5(trim(request("PassWord")))
  26. xxx=trim(request("xxx"))
  27. if user<>olduser then
  28. Set rs=Server.Createobject("Adodb.Recordset")
  29. sql="select * from adminx where adx_name='"&user&"'"
  30. rs.open sql,conn,1,3
  31. if not rs.eof and not rs.bof then
  32. Call backurl("帐号已存在!")
  33. rs.close
  34. set rs=nothing
  35. end if
  36. end if
  37. Set rs=Server.Createobject("Adodb.Recordset")
  38. sql="select * from adminx where adx_id="&xxx
  39. rs.open sql,conn,1,3
  40. rs("adx_name")=user
  41. rs("adx_pass")=pwd
  42. rs("adx_Tname")=Tname
  43. rs("adx_tel")=tel
  44. rs.update
  45. rs.close
  46. set rs=nothing
  47. call GoUrl("PassMod.asp","修改成功!")
  48. end if%>
  49. <table width="100%" height="42" border="0" cellpadding="0" cellspacing="0">
  50. <tr>
  51. <td width="4%" height="42" align="center" background="../images/top_bg2.jpg"><img src="../images/dian.gif" width="10" height="10" /></td>
  52. <td width="96%" background="../images/top_bg2.jpg" class="hui12">后台管理:&gt;&gt; 管理员密码修改</td>
  53. </tr>
  54. </table>
  55. <br />
  56. <%Set rs=Server.Createobject("Adodb.Recordset")
  57. sql="select * from adminx where adx_name='"&session("adminxxx")&"'"
  58. rs.open sql,conn,1,3
  59. if rs.eof then response.Write("")%>
  60. <table width="50%" border="0" align="center" cellpadding="0" cellspacing="1" class="tab_bdr">
  61. <form name="theForm" method="post" action="PassMod.asp?act=mod" onsubmit="return LogChk();"><tr>
  62. <td colspan="5" align="center" background="../images/bg2.jpg" class="tb_bg"><strong>管理员密码修改</strong></td>
  63. </tr>
  64. <tr>
  65. <td width="33%" height="26" align="center" class="NcB_bg">帐  号</td>
  66. <td width="67%" class="NcB_bg">
  67. <input name="UserName" type="text" id="UserName" value="<%=rs("adx_name")%>" size="19" maxlength="19" />
  68. <input name="xxx" type="hidden" id="xxx" value="<%=rs("adx_id")%>" />
  69. <input name="olduser" type="hidden" id="olduser" value="<%=rs("adx_name")%>" /></td>
  70. </tr><tr>
  71. <td width="33%" height="26" align="center" class="NcB_bg">密  码</td>
  72. <td width="67%" class="NcB_bg">
  73. <input name="PassWord" type="password" id="PassWord" value="<%=rs("adx_pass")%>" size="20" /> </td>
  74. </tr>
  75. <tr>
  76. <td width="33%" height="26" align="center" class="NcB_bg">重复密码</td>
  77. <td width="67%" class="NcB_bg">
  78. <input name="rPassWord" type="password" id="rPassWord" size="20" />
  79. </td>
  80. </tr>
  81. <tr>
  82. <td width="33%" height="26" align="center" class="NcB_bg">姓  名</td>
  83. <td width="67%" class="NcB_bg">
  84. <input name="Tname" type="text" id="Tname" value="<%=rs("adx_Tname")%>" size="19" /> </td>
  85. </tr> <tr>
  86. <td width="33%" height="26" align="center" class="NcB_bg">联系方式</td>
  87. <td width="67%" class="NcB_bg"><input name="tel" type="text" id="tel" value="<%=rs("adx_tel")%>" size="19" /></td>
  88. </tr>
  89. <tr>
  90. <td width="33%" height="26" align="center" class="NcB_bg">&nbsp;</td>
  91. <td width="67%" class="NcB_bg"><input type="submit" name="Submit" value="修改" />
  92. <input type="reset" name="Submit2" value="重置" /></td>
  93. </tr>
  94. </form>
  95. </table>
  96. <%rs.close
  97. set rs=nothing%>
  98. </body>
  99. </html>