Xbase++

GMail SMTP port 587 with "less secure" Password Authentication

See more SMTP Examples

Send email using GMail's SMTP server on port 587 (SSL via STARTTLS). Xbase++

LOCAL nSuccess
LOCAL oMailman
LOCAL oEmail

nSuccess := 0

//  This example assumes the Chilkat API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

oMailman := CreateObject("Chilkat.MailMan")

//  Use the GMail SMTP server
//  This example assumes your GMail account allows for "less secure apps" to use 
//  SMTP username/password authentication.
//  For OAuth2 authentication, see GMail SMTP with OAuth2 Authentication
oMailman:SmtpHost := "smtp.gmail.com"
oMailman:SmtpPort := 587
oMailman:StartTLS := 1

//  Set the SMTP login/password.
oMailman:SmtpUsername := "chilkat.support"
oMailman:SmtpPassword := "myPassword"

//  Create a new email object
oEmail := CreateObject("Chilkat.Email")

oEmail:Subject := "This is a test"
oEmail:Body := "This is a test"
oEmail:From := "Chilkat Support <chilkat.support@gmail.com>"
oEmail:AddTo("Chilkat", "support@chilkatsoft.com")

nSuccess := oMailman:SendEmail(oEmail)
IF (nSuccess != 1)
    ? oMailman:LastErrorText
    oMailman:destroy()
    oEmail:destroy()
    RETURN
ENDIF

? "Email sent."

oMailman:destroy()
oEmail:destroy()