1首先要下载findpasswrod.asp文件，下载地址：http://92zrm.com/zb_users/upload/2013/6/findpassword.rar
或者将以下代码复制粘贴到记事本，保存为findpasswrod.asp的文件。
<%@ CODEPAGE=65001 %>
<%
'///////////////////////////////////////////////////////////////////////////////
'// Z-Blog
'// 作 者: 朱煊&Sipo
'// 版权所有: RainbowSoft Studio
'// 技术支持: rainbowsoft@163.com
'// 程序名称:
'// 程序版本:
'// 单元名称:
'// 开始时间: 2009-7-26
'// 最后修改: 2012-10-13
'// 备 注: Z-Blog密码重置工具
'///////////////////////////////////////////////////////////////////////////////
%>
<% Option Explicit %>
<% On Error Resume Next %>
<% Response.Charset="UTF-8" %>
<%Response.Buffer=True %>
<!-- #include file="zb_users/c_option.asp" -->
<!-- #include file="zb_system/function/c_function.asp" -->
<!-- #include file="zb_system/function/c_system_lib.asp" -->
<!-- #include file="zb_system/function/c_system_base.asp" -->
<!-- #include file="zb_system/function/c_system_plugin.asp" -->
<!-- #include file="zb_system/function/c_system_event.asp" -->
<!-- #include file="zb_users/plugin/p_config.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="zh-cn">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Content-Language" content="zh-cn" />
<meta http-equiv="pragma" content="no-cache">
<meta http-equiv="cache-control" content="no-cache,must-revalidate">
<meta http-equiv="expires" content="0">
<title>Z-Blog 2.0 密码重置工具</title>
<link rel="stylesheet" rev="stylesheet" href="<%=GetCurrentHost%>ZB_SYSTEM/css/admin.css" type="text/css" media="screen" />
<style type="text/css">
<!--
*{
font-size:14px;
}
body{
margin:0;
padding:0;
color: #000000;
font-size:14px;
background:#EDF5FB;
}
h1,h2,h3,h4,h5,h6{
font-size:18px;
padding:0;
margin:0;
}
a{
text-decoration: none;
}
a:link {
color:#0066CC;
text-decoration: none;
}
a:visited {
color:#0066CC;
text-decoration: none;
}
a:hover {
color:#FF7F50;
text-decoration: underline;
}
a:active {
color:#FF7F50;
text-decoration: underline;
}
p{
margin:0;
padding:5px;
}
table {
border-collapse: collapse;
border:1px solid #333333;
background:#ffffff;
margin-top:10px;
}
td{
border:1px solid #333333;
margin:0;
padding:3px;
}
img{
border:0;
}
hr{
border:0px;
border-top:1px solid #666666;
background:#666666;
margin:2px 0 4px 0;
padding:0;
height:0px;
}
#frmLogin{
position:absolute;
left: 50%;
top: 40%;
margin: -150px 0px 0px -300px;
padding:0;
overflow:hidden;
width:600px;
height:400px;
background-color:white;
border:1px solid #B3C3CD;
}
#frmLogin h3{
padding:25px 0;
margin:1px 1px 0 1px;
text-align:center;
color:white;
background:#3A6EA5;
font-size:24px;
}
#divHeader{
background:#CFD9DF;
margin:0 1px 0 1px;
padding:8px;
}
#divMain{
height:265px;
}
#divFooter{
border-top:1px solid #A1B0B9;
margin:0 1px 0 1px;
text-align:center;
padding:2px;
}
#divMain_Top{
padding:8px;
padding-bottom:0;
}
#divMain_Center{
padding:5px;
}
#divMain_Bottom{
text-align:right;
padding:5px;
}
#txaContent{
border:1px solid #A1B0B9;
background:#FFFFFF;
}
.button{width:180px;height: 26px;}
-->
</style>
</head>
<body>
<form id="frmLogin" method="post">
<h3>Z-Blog 2.0 密码重置工具</h3>
<div id="divHeader"><a href="http://www.rainbowsoft.org/" target="_blank">Z-Blog主页</a> | <a href="http://bbs.rainbowsoft.org" target="_blank">Zblogger社区</a> | <a href="http://wiki.rainbowsoft.org/" target="_blank">Z-Wiki</a> | <a href="http://blog.rainbowsoft.org/" target="_blank">菠萝阁</a> | <a href="http://show.rainbowsoft.org/" target="_blank">菠萝秀</a> | <a href="http://download.rainbowsoft.org/" target="_blank">菠萝的海</a> | <a href="http://www.dbshost.cn/" target="_blank">DBS主机</a></div>
<div id="divMain">
<input type="hidden" name="userid" id="userid" value="0" />
<%
Call OpenConnect()
Dim m
Dim objRS,i,j
Set objRS=Server.CreateObject("ADODB.Recordset")
objRS.CursorType = adOpenKeyset
objRS.LockType = adLockReadOnly
objRS.ActiveConnection=objConn
objRS.Source="SELECT * FROM [blog_Member] WHERE [mem_Level]=1"
objRS.Open
If (Not objRS.bof) And (Not objRS.eof) Then
For i=1 To objRS.RecordCount
Response.Write "<p style='clear:both;padding:10px;'><span style='font-size:20px;float:left;'>"+"管理员:"+objRS("mem_Name")+"</span><input type='submit' value='重置密码为12345678' style='float:right;' onclick='document.getElementById(""userid"").value="&objRS("mem_ID")&"'></input></p>"
objRS.MoveNext
If objRS.eof Then Exit For
Next
End If
objRS.Close
Set objRS=Nothing
If CInt(Request.Form("userid"))>0 Then
j=Request.Form("userid")
'Dim objRS
Set objRS=objConn.Execute("SELECT [mem_Guid] FROM [blog_Member] WHERE [mem_ID]="&j)
If (Not objRS.Bof) And (Not objRS.Eof) Then
m=MD5(MD5("12345678") & objRS("mem_Guid"))
End If
objRS.Close
Set objRS=Nothing
objConn.Execute("UPDATE [blog_Member] SET [mem_PassWord]='"&m&"' WHERE [mem_ID]="&j)
Response.Write "<p style='clear:both;padding:10px;'><span style='font-size:14px;float:left;color:blue'>管理员密码已重置为12345678,请删除此文件并登陆管理您的Blog.</span></p>"
End If
Call CloseConnect()
%>
</div>
<div id="divFooter"><font color="red">注意:重置完密码后请立刻通过FTP管理工具删除此文件,防止他人调用此文件取得控制权.</font></div>
</form>
</body>
</html>
布米米AI 
