I have been attempting to use evntwin and evntcmd to configure an snmp trap to 
send to whatsup.  To test I have been using the following VB script below to 
create an event log.  I believe I have created the trap successfully it never 
gets sent to the WhatsUp server (never shows up in the SNMP log).  I have also 
tried other event logs without any luck.  Any help in this would be greatly 
appreciated.
 
  Const EvntInformation = 0     '**** Logs Information in Event Logs ..... ****'
 
  EvntType = EvntInformation
  EvntMessage = "Test SNMP"
 
  Dim EvntRemote, oShell, oEmail
    Wscript.echo EvntType & ":" & VBCRLF & EvntMessage
 
  Set oShell = Wscript.CreateObject("Wscript.Shell")
  oShell.LogEvent EvntType, EvntMessage
 
-------------
eventlog created
 
Event Type:           Information
Event Source:       WSH
Event Category:    None
Event ID:                0
Date:                      10/29/2008
Time:                      2:03:55 PM
User:                      N/A
Computer:             WhatsUp
Description:
Test SNMP
 

Reply via email to