How to Write to the Windows Application Log Using VBScript

This script helped me configure an enterprise monitoring system. I created little events in the Windows event log and monitored the events using the syslog system we implemented. The script creates any id and description you need.

Const EVENT_SUCCESS = 1

Set objShell = Wscript.CreateObject("Wscript.Shell")

objShell.LogEvent EVENT_SUCCESS, "Test error."

WScript.Echo "Complete"