Best Crèche Newsletter
<% on error resume next Dim mySQL, rstemp, connTemp, pSubPassword pEmail = request.querystring ("subemail") message = request.querystring ("message") %>Log In To Update Your Account
Password Reminder
Use this form if you have forgotten your password. You will receive your password by email.
<% if request.querystring("emailreminder")<>"" then 'find password mySQL="SELECT idEmail, name, subPassword from subscribers WHERE email='"&pEmail&"'" call getfromDatabase(mySQL, rstemp, "showMeMySubscriptions") if rstemp.eof then pMessage = dictLanguage.Item(Session("language")&"_subscriptionsmanagement_21") else pidemail = rstemp("idEmail") pName = rstemp("name") pSubPassword = rstemp("subPassword") pBody = dictLanguage.Item(Session("language")&"_subscriptionsmanagement_16") &pSubPassword pSubject = dictLanguage.Item(Session("language")&"_subscriptionsmanagement_20") &pCompany pMessage = dictLanguage.Item(Session("language")&"_subscriptionsmanagement_22") call sendMail(pCompany, pcompanyemail, pName, pEmail, pSubject, pBody) end if response.redirect "showMeMySubscriptions.asp?subemail="&pEmail&"&message="&pMessage end if %>