VBScript
VBScript
Send an Email via SMTP
See more SMTP Examples
Demonstrates the Chilkat MailMan.SendEmail method, which sends a single Email object through the configured SMTP server. This example configures the SMTP connection, builds a message, and sends it.
Background: SMTP (Simple Mail Transfer Protocol) is the protocol for sending mail. The typical flow is: connect to the server, authenticate, then hand over the message with
MAIL FROM, RCPT TO, and DATA. SendEmail wraps all of that: you build an Email with subject, recipients, and body, and Chilkat renders it to MIME and delivers it. Modern submission commonly uses implicit TLS on port 465 (SmtpSsl = true).Chilkat VBScript Downloads
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
success = 0
' Demonstrates the MailMan.SendEmail method, which sends a single Email object through the
' configured SMTP server.
set mailman = CreateObject("Chilkat.MailMan")
' Configure the SMTP server connection.
mailman.SmtpHost = "smtp.example.com"
mailman.SmtpPort = 465
mailman.SmtpSsl = 1
mailman.SmtpUsername = "user@example.com"
mailman.SmtpPassword = "myPassword"
' Build the email to send.
set email = CreateObject("Chilkat.Email")
email.Subject = "Test email from Chilkat"
email.From = "alice@example.com"
success = email.AddTo("Bob","bob@example.com")
email.Body = "Hello, this is a test message."
' Send the email.
success = mailman.SendEmail(email)
If (success = 0) Then
outFile.WriteLine(mailman.LastErrorText)
WScript.Quit
End If
outFile.WriteLine("Email sent.")
' Note: Explicitly connecting/authenticating is optional. Chilkat MailMan automatically
' connects and authenticates -- using the property settings above -- whenever a server
' operation requires it. Calling the explicit connect/authenticate methods can still be
' helpful to determine whether a failure occurs while connecting or while authenticating.
outFile.Close