Question

ASP+ACCESS数据库 后台密码怎么找回？

原来的密码没了，试过将ACCESS 表的32位MD5码修改成admin的MD5码 套进数据库里，但登进后台使用密码admin显示错误，具体哪里出错还是程序哪里需要改或是有更好的办法能修改密码。

Answer 1

将下面的代码保存为.asp然后传到空间运行。（保存之前修改下面代码中管理员帐号） <% Dim oRs, sUser, sPassword, oFso sUser = "admin" '管理员帐号，要数据库中存在的 sPassword = "admin" '重新设定的管理员密码 Set oRs = Server.Createobject("Adodb.Recordset") oRs.Open "Select * From [tb_admin] Where [w_name]='" & sUser & "'", Conn, 1, 3 If oRs.Eof Then Response.Write("帐号[" & sUser & "]不存在！") Else oRs("w_pass") = md5pass(sPassword) oRs("w_off") = 1 oRs.Update Set oFso = Server.Createobject("Scripting.Filesystemobject") oFso.Deletefile Server.Mappath(Request.ServerVariables("Path_Info")) Set oFso = Nothing Response.Write "密码重置胜利！" End If oRs.Close Set oRs = Nothing conn.close Set conn = Nothing %>复制代码

Answer 2

如果替换密码不胜利，看看验证代码部分是如何写的，有可以程序在进行MD5加密之前将密码加入了其它字符串然后再加密的，只要看过验证登录部分的代码，就可以重新加密并替换，如果实在不行就修改代码去掉验证，修改密码之后再还原验证代码。

Answer 3

麻烦已经解决 按照你的办法 很好用 太感谢了！