LiveCode Forums.

Code: Select all

on sendVerificationCode
   local tUrl, tEmailMessage, tSender, tRecipient, tSettings, tResult, tBytes, tResponseHeaders
   
   put "smtp://mail.portableairman.com:xxx/" into tUrl
   put  "Your Portable Airman Authentication Code is:" & tRandomAlphaNumericalGenerator  into tEmailMessage
   
   put "do_not_reply@portableairman.com" into tSettings["username"]
   put "xxxxxxxxxxxxxxxx" into tSettings["password"]
   put "do_not_reply@portableairman.com" into tSender
   put tDoDEmailCheck into tRecipient
 
   
   -- Enable TLS for SMTP
   put true into tSettings["use_ssl"]
   
   put tsNetSmtpSync(tURL, tSender, tRecipient, tEmailMessage, tResponseHeaders, tBytes, tSettings) into tResult  
   
   if the first word of tResult is "tsneterr:" then
      answer "Error" && tResult && "returned from server"
   else
      answer "E-mail sent"
   end if
   go to card "Verification"
end sendVerificationCode