IPagerAlert Method: SendPage

SendPage
(
 PagerMessage As String,
 [PagerSubject] As String
);

Parameters

[in] String PagerMessage
Message to be sent as pager alert.

[in] String PagerSubject
Subject of the pager message. This parameter is optional.

Description
Sends the pager alert (message) to the specified person through the pager server.

Example

Dim PagerAlert As IPagerAlert
'Get the interface. 'DirectScript.EventLogger.1'is the ProgId of 'the Event Logger component.
Set PagerAlert = CreateObject ("DirectScript.EventLogger.1")
 'Set the various details of the page to send
PagerAlert.PagerServerAddress ="192.168.0.1"
PagerAlert.PagerTo = "8004100784@metrocall.com"
'Send the pager alert
PagerAlert.SendPage "The user MSFT\John was created", "User Create"

 

See Also: