找回密码（一页）
数据库自己做，看里面的字段喽！
<script language="javascript">
<!--
function checkname()
{if (form1.checknam.value=="")
{alert("请输入你的账号！");form1.checknam.focus();return;}
form1.submit();
}
function checkanswer()
{if (form2.answer.value=="")
{alert("请输入你的答案！");form2.answer.focus();return;}
form2.submit();
}
function checkchange()
{
if(form3.password.value=="")
{alert("请输入你的密码！");form3.password.focus();return;}
if(form3.repassword.value=="")
{alert("请输入你的重复密码！");form3.repassword.focus();return;}
if(form3.password.value!=form3.repassword.value)
{alert("请输入同样的密码！");form3.repassword.focus();return;}
form3.submit();
}
-->
</script>
<script language="javascript" src="/release/js/select.js"></script>
</head>
<%
'找回密码程序
action=replace(trim(request.QueryString("action")),"'","")
select case action
case"question"
username=replace(trim(request.Form("checknam")),"'","")
if username<>"" and session("first")="firstasp" then
sql="select username,p_question from Member where username='"&username&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if rs.recordcount>0 then
username=rs("username")
question=rs("p_question")
step=1
session("second")="forasp"
else
response.Write "<script>alert('对不起,没有该用户！');window.location='Getpwd.asp';</script>"
response.End()
end if
end if
case "answer"
nam=request.Form("Username")
if nam<>"" and session("second")="forasp" then
sql="select p_answer from Member where username='"&nam&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if rs("p_answer")=replace(trim(request.Form("answer")),"'","") then
username=request.Form("username")
step=2
session("third")="thirdasp"
else
response.Write "<script>alert('对不起,答案错误！！');window.location='Getpwd.asp';</script>"
end if
end if
case "change"
pwd=replace(trim(request.Form("password")),"'","")
nam=replace(trim(request.Form("username")),"'","")
if pwd<>"" and nam<>"" and session("third")="thirdasp" then
sql="update Member set password='"&md5(pwd)&"' where username='"&request.Form("username")&"'"
conn.execute(sql)
response.Write "<script>alert('找回成功！可以登陆！');window.location='/UserManage/manage.asp';</script>"
response.End()
end if
case else
session("first")="firstasp"
end select
%>
<body>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><!--#include file="../head.asp" --></td>
</tr>
</table>
<table style="margin-top:3px;" width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="f-reg_k">
<tr>
<td valign="top"><table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="resA">
<tr>
<td height="28" background="images/class_bg2.jpg"><table width="232" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="22"><div align="center"><strong><img src="images/sj.gif" width="6" height="10" /></strong></div></td>
<td width="210"><strong>免费会员注册 >> 密码找回</strong></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
<tr>
<td width="760" height="135" valign="top">
<%
select case step
case"1"
%>
<form action="?action=answer" method="post" name="form2">
<table width="399" height="97" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="29" colspan="2" align="center">第二步</td>
</tr>
<tr>
<td width="90" height="41" align="center"><%=username%>的问题：</td>
<td width="309"><%=question%></td>
</tr> <tr>
<td width="90" height="41" align="center">请填写答案：</td>
<td width="309"><input type="text" size="25" maxlength="15" name="answer" /><input type="hidden" name="username" value="<%=username%>" /></td>
</tr>
<tr>
<td height="27" colspan="2" align="center"><input type="button" value="确定" onclick="checkanswer();"/></td>
</tr>
</table>
</form>
<%case "2"%>
<form action="?action=change" method="post" name="form3">
<table width="399" height="97" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="29" colspan="2" align="center">第三步</td>
</tr>
<tr>
<td width="90" height="41" align="center">输入新的密码</td>
<td width="309"><input type="password" size="25" maxlength="15" name="password" /></td>
</tr> <tr>
<td width="90" height="41" align="center">密码重复：</td>
<td width="309"><input type="password"size="25" maxlength="15" name="repassword" /><input type="hidden" name="username" value="<%=username%>" /></td>
</tr>
<tr>
<td height="27" colspan="2" align="center"><input type="button" value="确定" onclick="checkchange();"/></td>
</tr>
</table>
</form>
<%
case else
%>
<form action="?action=question" method="post" name="form1">
<table width="321" height="97" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="29" colspan="2" align="center">第一步</td>
</tr>
<tr>
<td width="90" height="41" align="center">我的账号</td>
<td width="231"><input type="text" size="25" maxlength="15" name="checknam" /></td>
</tr>
<tr>
<td height="27" colspan="2" align="center"><input type="button" value="确定" onclick="checkname();"/></td>
</tr>
</table>
</form>
<%
end select
%>
</td>
</tr>
</table></td>
</tr>
</table>