<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="UserConn.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">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=Config(8)%>_用户会员注册</title>
<link href="/images/ui.css" rel="stylesheet" type="text/css" /><%=Css%>
<script type="text/javascript">var InstallDir="<%=Config(0)%>";</script>
<script type="text/javascript" src="<%=Config(0)%>js/QvodCms.Ajax.js"></script>
<script type="text/javascript" src="<%=Config(0)%>js/QvodCms.Funciton.js"></script>
</head>
<body>
<%
Dim loste,uok,newpass
newpass=NoSqlHack(Request.Form("newpass"))'新密码
uok=NoSqlHack(Request.Form("uok"))'答案
username=NoSqlHack(Request.QueryString("username"))'用户名
action=NoSqlHack(Request.QueryString("action"))
loste=NoSqlHack(Request.QueryString("loste"))
%>
<center><%=OpenContent(SiteHeader)%></center>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="210">
    <%
   if action="two" and len(loste)>10  and uok<>"" and username<>"" Then
	   Set rs = Server.CreateObject("adodb.recordset")
	   rs.open"Select uok,uask from qvodcms_user where uok='"&uok&"'",conn,1,1
	   If not(rs.Eof and rs.bof) Then
	%>
    <table width="50%" height="108" border="0" align="center" cellpadding="0" cellspacing="0" class="userbox">
    <form action="GetLostedPassword2.Asp?loginname=64de069e7577sadf_________64deo44tyy8498f95df&action=pass&loste=b98b864de069e757713db50c338f95df_________64de069e7577sadf_________64deo44tyy8498f95df&username=<%=username%>" method="post" name="jajafrom">
      <tr>
        <td height="37" colspan="3" class="usertitle"><span class="STYLE1"><%=Config(8)%></span><strong> 密码找回管理</strong></td>
        </tr>
      <tr>
        <td height="33" align="center">请输入新的密码：
          <label>
          <input name="newpass" type="text" class="input" id="newpass" maxlength="30">
          <span class="STYLE2">* </span></label></td>
        </tr>
      <tr>
        <td height="36" align="center"><label>
          <input type="submit" name="button" id="button" value="下一步">
        </label></td>
        </tr></form>
      
    </table>
    <% 
	  Else
	   Call QvodCms_Err_Url("问题答案错误！！！","GetLostedPassword.asp")
       response.End()
	   rs.Close
	   Set rs=nothing
	  End If 
	Else
	   Call QvodCms_Err("问题答案不能为空！！！")
       response.End()
	End If
	''''''''''''''''''''''''''''
	%>
    </td>
  </tr>
</table>
<center><%=OpenContent(SiteFooter)%></center>
<%Call CloseConn()%>
</body>
</html>
