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:
Event Logging