Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
|
Load EML and Send
Demonstrates how to load an email from a .eml file and send. LOCAL loMailman LOCAL lnSuccess LOCAL loEmail * The mailman object is used for sending and receiving email. loMailman = CreateObject('Chilkat.MailMan2') * Any string argument automatically begins the 30-day trial. lnSuccess = loMailman.UnlockComponent("30-day trial") IF (lnSuccess <> 1) THEN =MESSAGEBOX("Component unlock failed") QUIT ENDIF * Set the SMTP server. loMailman.SmtpHost = "smtp.chilkatsoft.com" * Set the SMTP login/password (if required) loMailman.SmtpUsername = "myLogin" loMailman.SmtpPassword = "myPassword" * Create a new email object loEmail = CreateObject('Chilkat.Email2') * Load a .eml file into the email object. lnSuccess = loEmail.LoadEml("c:/temp/myEmail.eml") * Call SendEmail to connect to the SMTP server and send. * The connection (i.e. session) to the SMTP server remains * open so that subsequent SendEmail calls may use the * same connection. lnSuccess = loMailman.SendEmail(loEmail) IF (lnSuccess <> 1) THEN =MESSAGEBOX(loMailman.LastErrorText) QUIT ENDIF * Some SMTP servers do not actually send the email until * the connection is closed. In these cases, it is necessary to * call CloseSmtpConnection for the mail to be sent. * Most SMTP servers send the email immediately, and it is * not required to close the connection. We'll close it here * for the example: lnSuccess = loMailman.CloseSmtpConnection() IF (lnSuccess <> 1) THEN =MESSAGEBOX("Connection to SMTP server not closed cleanly.") ENDIF =MESSAGEBOX("Mail Sent!") |
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.
Mail Component · .NET Email Component · ASP Mail Component · XML Parser