重置动易(SiteWeaver 6.5)的管理员密码的代码

有朋友问我，动易密码忘了怎么办？下面就是一个很好的解决方法，在线修改程序

我不知道官方是否有解决方法，刚好我前几天自己手头的一个动易站密码忘了，由于数据库较大，原始的数据库都有14多M，更别说有填加过数据的数据库的大小了，下载下来改再上传也很化时间。于是根据数据结构自己简单的写了一个重置密码的小程序。 
将程序发给朋友，他使用之后说很方便。想想应该也会有其它人需要吧，上传上来好了：) 
复制代码 代码如下:
<%@language=vbscript codepage=936%> 
<% 
'作用：重置管理员admin的密码为123456，适用于动易5以上的系统，包括SiteWeaver 6.5 
'方法：上传到服务器动易系统的目录，运行此文件 
'注意：重置后请立刻删除! 
'作者：itlearner 
'网站: www.itlearner.com 
Option Explicit 
%> 
<!--#include file="conn.asp"--> 
<% 
    OpenConn 
    dim rs,sql 
    Set rs = Server.CreateObject("adodb.recordset") 
    sql = "select * from PE_Admin" 
    rs.Open sql, Conn, 2,3 
    do while not rs.eof  
    'response.write rs("adminname") & "-" & rs("Password") & "<br>" 
    rs("Password") = "49ba59abbe56e057" 
    rs.update 
    rs.movenext 
    loop 
    set rs = nothing 
    Response.write "密码重置成功！新密码为123456。" 
%>

解压后放在根目录，运行后密码即重置为123456。重置完后，请立刻删除这个文件，并登录后台修改密码！一定要删除这个文件，以防被他人运行再次重置密码。