IEmailAlert Method: SendEmail

SendEmail
(
 EmailMessage As String,
 EmailSubject As String
);

Parameters

[in] String EmailMessage
Message to be sent as the e-mail alert.

[in] String EmailSubject
Subject of the e-mail message. This parameter is optional.

Description
Sends the e-mail alert (message) to the specified person through the e-mail server.

Example

Dim EmailAlert As IemailAlert
'Get the interface. 'DirectScript.EventLogger.1'is the ProgId of 'the Event Logger component.
Set EmailAlert = CreateObject ("DirectScript.EventLogger.1")
'Set the various details of the e-mail to send
EmailAlert.SMTPServerAddress ="192.168.0.1"
EmailAlert.Emailto = "jsmith@microsoft.com"
'Send the e-mail alert
EmailAlert.SendEmail "The user MSFT\John was deleted", "User Delete"

 

See Also: