can't post reply in scripts library, questions should be posted in the discussion area.
ev.rec_mins does not appear to be part of the event class. try deleting the line "ev.rec_mins = strMinutes " and replacing it with "ev.rec_secs = strMinutes"
' if strMinutes > 0 then
' ev_count = hs.EventCount
' for i=1 to ev_count
' Set ev=hs.GetEvent(i)
' if ev.name = "Homeland Security Level" then
' if ev.rec_mins <> strMinutes then
' ev.rec_mins = strMinutes
' ev.rec_secs = 0
' AlertChange(strAlert)
' end if
' end if
' next
' End If
ev.rec_mins does not appear to be part of the event class. try deleting the line "ev.rec_mins = strMinutes " and replacing it with "ev.rec_secs = strMinutes"
' if strMinutes > 0 then
' ev_count = hs.EventCount
' for i=1 to ev_count
' Set ev=hs.GetEvent(i)
' if ev.name = "Homeland Security Level" then
' if ev.rec_mins <> strMinutes then
' ev.rec_mins = strMinutes
' ev.rec_secs = 0
' AlertChange(strAlert)
' end if
' end if
' next
' End If
Comment