目的: 管理しているサーバーに対する不正ログオンが無いかイベントログのサマリーをメールで送信する 補足: このサンプルは Log Parser の動作をご紹介するものです。 サーバーのセキュリティ対策についてはこの投稿の趣旨とは異なるので割愛させていただきます。 SendLogonAuditSummary.vbs 解説 'Log Parser オブジェクトを生成します Set objLogParser = CreateObject("MSUtil.LogQuery") 'イベントログからの入力を行うためオブジェクトを生成します。 Set objEventLogInputFormat = CreateObject("MSUtil.LogQuery.EventLogInputFormat") コマンド 1: ログオンに成功した監査を取得します。 イベント ID 528 のイベ