Create an instance of AspEmail
object as follows:
Set Mail = Server.CreateObject("Persits.MailSender")
AspEmail Properties and Methods
| Properties |
Description |
| Host As String |
The
internet address of the SMTP server to be used
to send email.
E.g: Mail.Host =
"mail.mycompany.com" |
| Port As Integer |
The
SMTP server port address. 25 by default. |
| From As String |
The
email address of the sender. |
| FromName As
String |
The
full name of the sender. |
| Subject As
String |
The
Subject line of the letter. |
| Body As String |
The
body of the letter. | |
| Methods |
Description |
| AddAddress(Email
As String,
Optional Name ) |
Adds
an email address and optionally the
corresponding full name to the letter's TO
list. |
| AddCC(Email As
String, Optional Name
) |
Adds
an email address and optionally the
corresponding full name to the letter's CC
list. |
| AddReplyTo(Email
As String,
Optional Name ) |
Adds
an email address and optionally the
corresponding full name to the letter's
REPLY-TO list. |
| AddAttachment(Path
as String) |
Adds
a file path to the list of attachments to be
sent with the letter. |
| Send As Boolean |
Sends
the letter. Throws exceptions in case of
errors. |
| Reset |
Empties
all the address lists so that a new letter
could be sent. | | |
Code Sample
Set
Mail =
Server.CreateObject("Persits.MailSender")
Mail.Host = "yourcompany.com"
Mail.From = "BYeltsin@Kremlin.gov.ru"
Mail.FromName = "President Boris
Yeltsin"
Mail.AddAddress
"jsmith@company.net", "John Smith,
Jr." Mail.AddAddress "paul@company.com", "Paul
L.Johnson,
Esq." Mail.AddReplyTo
"receptions@Kremlin.gov.ru"
Mail.Subject = "Black Tie Reception in Kremlin
On May Day" Mail.Body = "Dear
Sir:" + Chr(13) + Chr(10) + "Please be at the
Kremlin on May 1."
On Error
Resume Next
Mail.Send
If Err <> 0
Then Response.Write "Letter was
not sent due to the following error: " &
Err.Description End If
Profile
| Service | Contact
Us | Technical Support
|