‹‹ 上一主题 | 下一主题 ››
发新话题
打印

[asp] 关于MD5密码修改

zy8870194 [楼主]

高级会员

帖子
199 
体力
540  
威望
0  
当前
福建 福州
离线
2 天

专长 网管,安全
1# 大 中 小 发表于 2008-6-19 08:14 
前台：
复制内容到剪贴板
代码:
<!--#include file="conn.asp"-->
  <%   
        set rs=server.createobject("adodb.recordset")
        sq1 = "select * from personnal where [user]='"&trim(session("admin"))&"'"
        rs.open sq1,conn,1,1
   %>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../conn/style.css" rel="stylesheet" type="text/css">
</head>
<body>
  <form method="post" action="pass_save.asp" name="form1" onSubmit="javascript:return check();">
<div align="center"><center>
    <table  width="40%" border="1" cellspacing="0" cellpadding="0" bordercolorlight="#000000" bordercolordark="#FFFFFF">
      <tr bgcolor="#CCCCCC">
        <td height="25" width="100%" align="center"><font size="2">修改您的密码</font></td>
      </tr>
      <tr align="center">
      <td width="100%">
    <table border="0" cellspacing="1" width="100%">
        <tr>
         <td width="25%" align="right" valign="top">
          <font size="2">账号 </font></td>
         <td width="75%">&nbsp;&nbsp;&nbsp; <%=rs("user")%><br></td>
        </tr>
        <tr>
        <td width="25%" align="right" valign="top">
          <font size="2">原密码 </font></td>　
           <td width="75%">&nbsp;&nbsp;<input type="password" name="pin"><br></td>
        </tr>
      <tr>
        <td width="25%" align="right" valign="top">
          <font size="2">新密码</font>
            <td width="75%">&nbsp;&nbsp;<input type="password" name="newpin"><br></td>
      </tr>      
      <tr>
                <td width="25%" align="right" valign="top"> <font size="2">确认密码</font>
<td width="75%">&nbsp;&nbsp;<input type="password" name="re_newpin"><br><br></td>
      </tr>
      </table>
      </td>
      </tr>
   
</table>
</center></div>
<div align="center"><center><p><input type="submit" value=" 确 定 ">&nbsp;
<input type="reset" value=" 清 除 "></p>
  </center></div>
</form>
</body>
</html>
<%
   set rs= nothing
        conn.Close
        set conn = nothing
%>
执行页

 提示：您可以先修改部分代码再运行
请问下具体哪里错了 不能更改

TOP

cyc308

高级会员

帖子
335 
体力
676  
威望
0  
离线
2 天
2# 大 中 小 发表于 2008-6-19 13:02 
if rs.bod ??? and rs.eof then

无意中看到
cyc308

TOP

ASP0000

中级会员

帖子
140 
体力
317  
威望
0  
离线
55 天
3# 大 中 小 发表于 2008-6-19 17:24 
呵呵。
rs.bof

TOP

‹‹ 上一主题 | 下一主题 ››
发新话题