<!--#include file="Inc.asp"-->
<!--#include file="ydzq1.asp"-->
<%'============================================================
' Copyright 2007-09 燃点真情. All Rights Reserved.
' Last Update: 2008-3-22  13:28
' ADD:wap.nowtx.cn
' E-Mail: xivn@163.com  QQ:531233814
'============================================================
%>
<card title='找回密码'><p>

call head()







dim p
p=trim(request.querystring("p"))
if p<>"" then
dim name,mail,userid,pass,sjhm
sjhm=usb(request("sjhm"))
answer=usb(request("answer"))

set rs=Server.CreateObject("ADODB.Recordset")
rs.open"select [ID],[name],[answer],[mm],[sjhm] from [users] where [sjhm]='"& sjhm &"' and [answer]='"&answer&"' order by [id] desc",conn,1,1
	if rs.eof then
  Call Error("手机号和密码保护答案填写错误！")
end if
 sjhm=rs("sjhm")
 pass=rs("mm")
 userid=rs("ID")
rs.close
set rs=nothing
response.Write "找回密码成功!<br/>"
response.Write "您的手机是<b>"&sjhm&"</b><br/>"
response.Write "您的ID号是<b>"&userid&"</b><br/>"
response.Write "您的密码是<b>"&pass&"</b><br/><br/>"
Response.Write "<a href='login.asp?saytk="&saytk&"&amp;sid="&sid&"'>马上登录</a><br/><br/>"
else
Response.Write "你选择通过密码保护取回密码"
Response.Write "你的手机号码：<br/><input name=""sjhm"" maxlength=""11""/><br/>"
Response.Write "你的密保答案：<br/><input name=""answer"" maxlength=""50"" value=""""/><br/>"
Response.Write "<anchor>找回密码"
Response.Write "<go href=""passf.asp?p=1"" method=""post"" accept-charset=""utf-8"">"
Response.Write "<postfield name=""sjhm"" value=""$(sjhm)""/>"
Response.Write "<postfield name=""answer"" value=""$(answer)""/>"
Response.Write "</go></anchor><br/>"
end if
Response.Write "---------<br/><a href='login.asp?saytk="&saytk&"&amp;sid="&sid&"'>返回登录</a>"& chr(13)
conn.close
set conn=nothing
%><!--#include file="fanhui.asp"-->
</p></card>
</wml>