EventLog - vbscript
This is elsewhere, just writing it here so it's easy to find for myself:
Set sho = CreateObject("WScript.Shell")
sho.LogEvent 4, "Script started." ' Information
sho.LogEvent 2, "An error occured." ' warning
sho.LogEvent 0, "Something worked." ' success
sho.LogEvent 1, "Something failed." 'Error
sho.LogEvent 8, "Audit Success." 'Audit Success
sho.LogEvent 16, "Audit Failed." 'Audit Failure