Adding custom headers (MailBee Objects Tutorials)

From AfterLogic Wiki

Jump to: navigation, search

The sample sends plain-text e-mail with "Organization:" field set in the headers.

SMTP.AddHeader is a key method of the sample.

For simplicity, SMTP authentication is not used and no error-checking is performed.

Dim objSMTP
 
' Create mailer component
Set objSMTP = CreateObject("MailBee.SMTP")
 
' Unlock SMTP component
objSMTP.LicenseKey = "put your license key here"
 
' Set SMTP server name
objSMTP.ServerName = "mail.server.com"
 
' Set message properties
objSMTP.FromAddr = "me@mydomain.com"
objSMTP.ToAddr = "you@yourdomain.com"
objSMTP.Subject = "Hi"
objSMTP.BodyText = "This is test message with custom headers"
 
' Add "Organization" header
objSMTP.AddHeader "Organization", "Corporation, Inc."
 
' Send it!
objSMTP.Send
<%
Dim objSMTP
 
' Create mailer component
Set objSMTP = Server.CreateObject("MailBee.SMTP")
 
' Unlock SMTP component
objSMTP.LicenseKey = "put your license key here"
 
' Set SMTP server name
objSMTP.ServerName = "mail.server.com"
 
' Set message properties
objSMTP.FromAddr = "me@mydomain.com"
objSMTP.ToAddr = "you@yourdomain.com"
objSMTP.Subject = "Hi"
objSMTP.BodyText = "This is test message with custom headers"
 
' Add "Organization" header
objSMTP.AddHeader "Organization", "Corporation, Inc."
 
' Send it!
objSMTP.Send
%>

See Also:
AddHeader Method