VBSでＷｉｎｄｏｗｓのイベントログにメッセージを出力するサンプルソースを掲載しています。
■使用例
以下の例では、「EVENT_KIND」を変更することにより、成功、エラー等のメッセージ種類の
変更が行えるサンプルソースです。
■仕様
| Const EVENT_KIND (イベント種類) | 0 :成功 1 :ERROR（エラー） 2 :WARNING（警告） 4 :INFORMATION（情報） |
| objShell.LogEvent | ■引数1 イベントログの種類 ■引数2 メッセージ |
'#EVENT_KINDで設定可能情報###########################
'0 :成功
'1 :ERROR（エラー）
'2 :WARNING（警告）
'4 :INFORMATION（情報）
'############################
Const EVENT_KIND = 1
Set objShell = Wscript.CreateObject("Wscript.Shell")
objShell.LogEvent EVENT_KIND, "バックアップに失敗しました。"