<html>
<head>
<!--#include file="const.asp" -->
<title><%=rs("title")%>---<%=rs("lovetitle")%></title>
<link rel="stylesheet" href="../images/css.css" type="text/css">
</head>
<body leftmargin="0" marginwidth="0" topmargin="0" marginheight="0">
<SCRIPT LANGUAGE=javascript>
//<!--
	function sss(URL)
	{
		newwin=window.open('','_blank','fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0');
		if(document.all){
		newwin.moveTo(200,40 )
		newwin.resizeTo(400,400 );
		}
		newwin.location=URL
		newwin.focus();
	}

	
//-->
</SCRIPT>
<!--#include file="top.asp" -->
<table id="Table_01" width="778" height="383" border="0" cellpadding="0" cellspacing="0" align="center">
  <tr> 
    <td colspan="4"> <img src="../image/images/PASSWORD_01.gif" width="778" height="9" alt=""></td>
  </tr>
  <tr> 
    <td rowspan="2"> <img src="../image/images/PASSWORD_02.gif" width="11" height="100" alt=""></td>
    <td colspan="2"> <img src="../image/images/PASSWORD_03.gif" width="753" height="99" alt=""></td>
    <td> <img src="../image/images/PASSWORD_04.gif" width="14" height="99" alt=""></td>
  </tr>
  <tr> 
    <td> <img src="../image/images/PASSWORD_05.gif" width="342" height="1" alt=""></td>
    <td colspan="2" rowspan="2" background="../image/images/PASSWORD_06.gif" height="274" valign="top"> 
      <table width="92%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td height="31">&nbsp;</td>
        </tr>
        <tr> 
          <td> <object runat=server id=conn1 progid="adodb.connection">
            </object> 
            <%application.Lock
conn1.Open Application("p_jyzx")
Application.UnLock
%>
            <% user_name=replace(Request("user_name")," ","~",1,-1,1)
sql="select * from user where user_name='"&user_name&"'"
set rs=server.CreateObject ("ADODB.recordset")
 rs.Open sql,conn1,3
if rs.RecordCount =0 then
	rs.Close
    set rs=nothing
	Response.Redirect "error.asp?cause=0"  'cause=0 表示没有这个会员

else
	email=trim(rs("Email"))
               
	
	mailbody=user_name&"，您好！您在福建交友热线 http://www.fj520.net 注册的密码是："&rs("passwd") 
    SMTPServer_username=Application("SMTPServer_username")
    SMTPServer_passwd=Application("SMTPServer_passwd")
	SMTPServer=Application("SMTPServer")
	SystemEmail=Application("SystemEmail")
	SenderName=Application("SenderName")
	
	topic="福建交友热线 您忘记的密码"
	
	on error resume next
	dim msg,SendMail
	Set msg = Server.CreateObject("JMail.Message")

		msg.silent = true
		msg.Logging = true
		msg.Charset = "gb2312"
		msg.MailServerUserName = SMTPServer_username
		msg.MailServerPassword = SMTPServer_passwd
		msg.From = SystemEmail
		msg.FromName = SenderName
		msg.AddRecipient email,user_name
		msg.Subject = topic
		msg.Body = mailbody
		msg.Send (SMTPServer)
	set msg=nothing
	if err then 
	SendMail=err.description
	err.clear
	else
	SendMail="成功"
	end if
	
	
	
end if 
%>
            <p align=center><img border="0" src="images/mim2.jpg"> </p>
            <p align=center><font color="#FF5050"><%=user_name%></font>&nbsp;，您好！我们已经将您的密码发到您的注册信箱<font color="#FF5050"><%=email%></font>中了！<br>
              还有什么问题，请您联系交友中心管理员<a href="mailto:<%=Application("SystemEmail")%>"><%=Application("SystemEmail")%></a> 
            </p>
            <p align=center><font size=5><a href=javascript:close() >关闭窗口</a><font> 
              </font></font></p>

</td>
        </tr>
      </table>
    </td>
  </tr>
  <tr> 
    <td colspan="2"> <img src="../image/images/PASSWORD_07.gif" width="353" height="273" alt=""></td>
  </tr>
  <tr> 
    <td> <img src="../image/images/spacer.gif" width="11" height="1" alt=""></td>
    <td> <img src="../image/images/spacer.gif" width="342" height="1" alt=""></td>
    <td> <img src="../image/images/spacer.gif" width="411" height="1" alt=""></td>
    <td> <img src="../image/images/spacer.gif" width="14" height="1" alt=""></td>
  </tr>
</table>


<p align="center"><!--#include file="../copyright.asp" --></p>
</FORM>
</BODY>
</HTML>

