JY
Guest
|
Posted:
Sun Nov 13, 2005 9:50 am Post subject:
How to Set CustomField in alerts |
|
|
I have a script to generate MOM alerts and at the same time I want use to
the CustomFields to store metadata such as application information. However
I wasn't able to get the SetCustomField to submit data. Any help is
appreciated.
Thanks
jy
Const ALERT_Critical_Error = 50
CreateNewAlert Name, AlertLevel, Compuer, Domain
Sub CreateNewAlert()
Dim objCreatedAlert
Set objCreatedAlert = ScriptContext.CreateAlert()
objCreatedAlert.Name = "Name"
objCreatedAlert.AlertLevel = ALERT_Critical_Error
objCreatedAlert.AlertSource = "TEST SOURCE"
objCreatedAlert.Description = "Test description"
ScriptContext.Submit objCreatedAlert
CALL objCreatedAlert.SetCustomField(1, "WST")
Set objCreatedAlert = Nothing
End Sub |
|