David Thomas
Guest
|
 Posted:
Tue Jan 25, 2005 5:54 am Post subject:
MOM 2005 Script Error |
|
|
I'm getting an error alert due to a script failing, with the
associated event 9100's that cause the alert. The script in question
is "MOM Action Account Expiration Check" and it fails on line 90. If
blank lines are counted line 90 is a Dim statement, so I don't think
that's it. If blank lines aren't counted line 90 is setting the alert
level during alert creation. The alert its creating is to tell me
that the Action account is due it expire in X days. I believe I have
the action account set up to never expire (blah blah blah security
blah blah).
Any ideas?
Here's the subfunction:
Sub CreateAlert(ByVal sAccount, ByVal lDays, ByVal lAlertLevel)
Dim oAlert
Set oAlert = ScriptContext.CreateAlert()
With oAlert
.Name = sAccount & " password expires soon"
.Description = "The password for the " & sAccount & " action
account will expire in " & lDays & " days."
.AlertSource = "Microsoft Operations Manager"
.AlertLevel = lAlertLevel <----- Line 90 w\o blank lines
End With
ScriptContext.Submit oAlert
End Sub |
|
JesseH
Guest
|
| Posted:
Fri Jan 28, 2005 10:01 pm Post subject:
Re: MOM 2005 Script Error |
|
|
You may want to try setting your own alert level here... say 50 and see if
that works?
"David Thomas" <DaveT72@yahoo.ca> wrote in message
news:j72bv09ru65t48neaee10ei8iqjtapd6ov@4ax.com...
| Quote: | I'm getting an error alert due to a script failing, with the
associated event 9100's that cause the alert. The script in question
is "MOM Action Account Expiration Check" and it fails on line 90. If
blank lines are counted line 90 is a Dim statement, so I don't think
that's it. If blank lines aren't counted line 90 is setting the alert
level during alert creation. The alert its creating is to tell me
that the Action account is due it expire in X days. I believe I have
the action account set up to never expire (blah blah blah security
blah blah).
Any ideas?
Here's the subfunction:
Sub CreateAlert(ByVal sAccount, ByVal lDays, ByVal lAlertLevel)
Dim oAlert
Set oAlert = ScriptContext.CreateAlert()
With oAlert
.Name = sAccount & " password expires soon"
.Description = "The password for the " & sAccount & " action
account will expire in " & lDays & " days."
.AlertSource = "Microsoft Operations Manager"
.AlertLevel = lAlertLevel <----- Line 90 w\o blank lines
End With
ScriptContext.Submit oAlert
End Sub
|
|
|
FAQ
Memberlist
Register
Profile
Log in to check your private messages
Log in