From CDONTS To JMAIL

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Hi 
Can some one help me please , i want to change this getpassword.asp page code, need Jmail instead of CDONTS (case server support ).
the page can send an email with password after the member insert his email .
Thanks a lot
-------------------------------------------------------
getpassword.asp
<!--#include file="conn.asp"-->
<%
mailerror = false
If Request.Form("password") <> "" Then
 txtemail = Request.Form("Email")

 set rs = server.createobject("adodb.recordset")

 sql = "Select * From Users Where Email='" & txtEmail & "';"

 rs.open sql, conn, 3, 3

 If not rs.eof then 
  Dim myMail, myBody

  Set myMail = CreateObject("CDONTS.NewMail")

  myBody= "Your username is " & rs("Username") & vbCRLF & "Your password is " & rs("Password") & vbCRLF & "Your are receiving this email from a request at YOUR WEB." & vbCRLF & _
  "If you received this email in error, please contact us"

  myMail.From="YOUR MAIL ADDRESS"
  myMail.To= txtemail
  myMail.Subject="Requested Username/Password"
  myMail.Body=myBody
  myMail.Send

  set mymail=nothing
  rs.close
  set rs = nothing
  conn.close
  set conn = nothing

Response.redirect("success.asp")
 else
  mailerror = true
 end if
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>Get password</TITLE>
<META http-equiv=Content-Type content="text/html; charset=windows-1252">
<META content=, name=Keywords>
<META content=, name=description>
<link href="style.css" rel="stylesheet" type="text/css">
<META content="MSHTML 5.50.4134.100" name=GENERATOR>
</HEAD>
<BODY>
      Forgot password ? 
    If you have forgot your password, just fill in the e-mail you used when you registered. Your username and password will be mailed to this address.

<%if mailerror = true then %>Invalid email address. Please try again<%end if%><form action="getpassword.asp" method="post">
<INPUT TYPE="HIDDEN" NAME="password" VALUE="yes">

  Email:
  <input onmouseover=this.focus() class="niceinput" name="Email" type="text" size="20">
          <input class="niceinput" name="Submit" type="submit" value="Submit">
    <br><a href="default.asp">Home</a>

 </BODY></HTML>

Edited by lana