COMMUNiCATE Newsletter
A great way for COMMUNiCATE to update people on all our activities, both our team and clients, is to send out a newsletter. We have two formats – print (three times a year) and E-zine (every month).
<% 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 %>See below for what our clients have to say about us 