Welcome to RR Shipping

<% if request("submit") = "Submit" then stremail = request("email") strSelect = "SELECT RRS_PASSWORD FROM TB_RRS WHERE RRS_LOGIN = '" & stremail & "'" response.write strSelect 'response.end set rs1 = objConn.execute(strSelect) if not rs1.eof then Dim ObjMail,strbody2 Set objMsg = Server.CreateObject("Persits.MailSender") objMsg.Host = "rrshipping.com" objMsg.AddAddress stremail objMsg.Subject = "RRS Email and Password" strMsg = strMsg & "Email" & stremail & "and Password" & rs1("RRS_PASSWORD") & vbcrlf objMsg.Body = strMsg objMsg.isHTML = true objMsg.Body = strMsg objMsg.Send() response.redirect "tracking.asp" else msg = "Email id dosent exists in records" end if end if %>

Home I Utility I About Us I Contact Us

Forgot password

Please enter your login email ID& submit. We will mail you the new password.