www.gusucode.com > 云枫企业网站源代码第二版 2.0源码程序 > cn/password.asp

    <style type="text/css">
<!--
.STYLE1 {font-weight: bold}
body,td,th {
	font-size: 12px;
	font-family: Arial, Helvetica, sans-serif;
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-color: #E5E5EF;
}
.STYLE2 {color: #FF0000}
-->
</style>
<!--#include file="conn.asp"-->

<script language="javascript">
function checkform()	{
	if(document.form.username.value==""){
		alert("Username is requset!");
		document.form.username.focus();
		return false;
		}
	if(document.form.qustion.value==""){
		alert("qustion is request!");
		document.form.qustion.focus();
		return false;
		}
	if(document.form.answer.value==""){
		alert("answer is requset!");
		document.form.answer.focus();
		return false;
		}
	if(document.form.email.value==""){
		alert("Email is request!");
		document.form.email.focus();
		return false;
		}
	return true;
}
</script>
<table width="478" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="593" height="80" valign="top" background="images/01.jpg">&nbsp;</td>
  </tr>
</table>
<form action="" method="post" name="form" id="UserReg" onSubmit="return checkform();">
<table style="BORDER-COLLAPSE: collapse" bordercolor="#D3D5E2" 
                  cellspacing="0" cellpadding="3" width="478" align="center" 
                    border="1">
                  <tbody>
                    <tr align="middle">
                      <td height="20" colspan="2" class="down"><div align="left"><span 
                        class="style1 STYLE2"><b>找回密码</b></span><br />
                        <br />
                      </div></td>
                    </tr>
                    <tr class="tdbg">
                      <td width="19%" class="down"><span 
                        class="style1"><b>帐号：</b></span></td>
                      <td width="81%" class="down"><div style="float:left"><span class="style1">
                        <input id="username"  size="15" name="username"/>
                        <span class="STYLE1" style="color: #FF0000">**</span></span>&nbsp;&nbsp;</div> </td>
                    </tr>
                    <tr class="tdbg">
                      <td width="19%" class="down"><span 
                        class="style1"><b>电子邮件：</b></span></td>
                      <td width="81%" class="down"><span class="style1">
                        <input name="email" type="text" id="email" size="30" />
                        <span class="STYLE1" style="color: #FF0000">**</span></span></td>
                    </tr>
                    <tr class="tdbg">
                      <td width="19%" class="down"><span 
                        class="style1"><strong>提示问题：</strong></span></td>
                      <td width="81%" class="down"><span class="style1">
                        <input name="qustion" type="text" id="qustion" size="30" />
                        <span class="STYLE1" style="color: #FF0000">**</span></span></td>
                    </tr>
                    <tr class="tdbg">
                      <td class="down"><span class="style1"><strong>提示答案：</strong></span></td>
                      <td width="81%" class="down"><input id="Somane2" size="30" 
                        name="answer" />
                      <span class="STYLE1" style="color: #FF0000">**</span></td>
                    </tr>
                  </tbody>
  </table>
				
             <div align="center">
                  <input type="submit" name="Submit3" value="提交" />
                  
                  
                  <input type="reset" name="Submit32" value="清除" />
  </div>
                </div>
</form>

<%
	ServerName=Cstr(Request.ServerVariables("HTTP_REFERER"))
	ServerName1=Cstr(Request.ServerVariables("SERVER_NAME"))
if request.form("Submit3")="提交" then
   if Mid(ServerName,8,len(ServerName1))<>ServerName1 then
		Response.Write "<script language=javascript>alert('error!');window.close();</script>"
   End if
	Set rs = Server.CreateObject("ADODB.RecordSet")
	sql = "select * from member where member='"&Replace(Request.form("username"),"'","")&"'"
	rs.open sql,conn,1,3
	if rs.eof then
	   response.Write "<script language=javascript>alert('No record！');history.back();</script>"
       response.End()
	else
       if rs("mail")<>Replace(Request.form("email"),"'","") then
	      response.Write "<script language=javascript>alert('Email is wrong！');history.back();</script>"
          response.End()
	   end if
       if rs("wt")<>Replace(Request.form("qustion"),"'","") then
	      response.Write "<script language=javascript>alert('Qustion is wrong！');history.back();</script>"
          response.End()
	   end if
       if rs("da")<>Replace(Request.form("answer"),"'","") then
	      response.Write "<script language=javascript>alert('Answer is wrong！');history.back();</script>"
          response.End()
	   end if
			  response.Write "<script language=javascript>alert('Your password is "&rs("password")&"！');window.close();</script>"
          response.End()
	end if
	rs.close
	set rs=nothing
End if
%>