 |
Purpose
Sends a message.
If the To and From email attributes have not been set, an error occurs. To check the error code, use Error.
Syntax
Message.Send
Example
Sub Main()
Dim MyMessage As Email
...
MyMessage.From = "Administrator"
MyMessage.Subject = "Welcome!"
For i = 0 to 3
MyMessage.To = Users(i)
MyMessage.Body = "Welcome " & Users(i) & "your account has " _ & "been created."
MyMessage.Send
Next i
End Sub
|  |