manilaSuite.members.sendMemberSignupMail

It is not realistic to assume that all websites will store the names of members, given European data laws

on sendMemberSignupMail (adrMemberInfo=nil, adrsite=nil, emailText=nil, subject=nil)

«Changes:

unaltered lines omitted

if adrsite == nil or adrmemberinfo == nil //get these from the pageTable

unaltered lines omitted

local (adrnewssite = manilaSuite.getNewsSiteAddress (adrsite))

local (loginUrl = adrsite^.["#urls"].memberLogon)

local (signOutLink = html.getLink ("Sign Out", adrsite^.["#urls"].memberLogOff))

local (fromAddress, memberName)

if emailText == nil

unaltered lines omitted

if subject == nil

unaltered lines omitted

fromAddress = string (adrnewssite^.emailConfirmationSender)

if defined (adrMemberInfo^.personalInfo.name)

unaltered lines omitted

else

unaltered lines omitted

local (recipient = nameOf (adrMemberInfo^))

emailText = searchEngine.replaceAll (emailText, "{password}", adrMemberInfo^.password, true)

emailText = searchEngine.replaceAll (emailText, "{memberName}", memberName, true)

emailText = searchEngine.replaceAll (emailText, "{loginUrl}", loginUrl, true)

emailText = searchEngine.replaceAll (emailText, "{signOutLink}", signOutLink, true)

«tcp.sendMail (recipient, subject, emailText, fromAddress)

manilaSuite.sendMail (recipient, subject, emailText, fromAddress) //PBS 08/07/00: call manilaSuite.sendMail

return (true)

Relative to Frontier version 9.7b10