LKBEN10629: Howto create an eventlog entry in the windows eventlog with VBScript
Symptom
You would like to automatically create eventlog entries
Cause
none
Solution
You can write a little vbs script with the following contents:
Dim oShell, sLogEntry
Set oShell = CreateObject("WScript.Shell")
sLogEntry = "Hello Lubby"
sLogEntry = sLogEntry & vbCrLf
oShell.LogEvent 4, sLogEntry
'The first parameter determines the type of entry.
'0 SUCCESS
'1 ERROR
'2 WARNING
'4 INFORMATION
'8 AUDIT_SUCCESS
'16 AUDIT_FAILURE
Disclaimer:
The information provided in this document is intended for your information only. Lubby makes no claims to the validity of this information. Use of this information is at own risk!About the Author
Author: - Keskon GmbH & Co. KG
Wim Peeters is electronics engineer with an additional master in IT and over 30 years of experience, including time spent in support, development, consulting, training and database administration. Wim has worked with SQL Server since version 6.5. He has developed in C/C++, Java and C# on Windows and Linux. He writes knowledge base articles to solve IT problems and publishes them on the Lubby Knowledge Platform.