(Tcl) Send Email using smtp-mail.outlook.com with Password Authentication
Demonstrates how to send an email using smtp-mail.outlook.com using password authentication.
load ./chilkat.dll
# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
set mailman [new_CkMailMan]
CkMailMan_put_SmtpHost $mailman "smtp-mail.outlook.com"
CkMailMan_put_SmtpPort $mailman 587
CkMailMan_put_StartTLS $mailman 1
# Set the SMTP login/password
CkMailMan_put_SmtpUsername $mailman "OFFICE365_USERNAME"
CkMailMan_put_SmtpPassword $mailman "OFFICE365_PASSWORD"
# Create a new email object
set email [new_CkEmail]
CkEmail_put_Subject $email "This is a test"
CkEmail_put_Body $email "This is a test"
CkEmail_put_From $email "My Name <my_office365_email@outlook.com>"
set success [CkEmail_AddTo $email "Chilkat Admin" "admin@chilkatsoft.com"]
set success [CkMailMan_SendEmail $mailman $email]
if {$success != 1} then {
puts [CkMailMan_lastErrorText $mailman]
delete_CkMailMan $mailman
delete_CkEmail $email
exit
}
puts [CkMailMan_smtpSessionLog $mailman]
set success [CkMailMan_CloseSmtpConnection $mailman]
if {$success != 1} then {
puts "Connection to SMTP server not closed cleanly."
}
puts "Email Sent!"
delete_CkMailMan $mailman
delete_CkEmail $email
|
