Skip to main content
評価してください: 

vol.7「MOM 2005 管理パックを作ってみよう」

イベント発生

公開日: 2004 年 11 月 25 日

小川 貢

トピック

イベントを記録させる
MOM 2005 アラートの確認

イベントを記録させる

イベント ビューアの Application ログにイベントを記録させるために、以下のような VBScript を作成しました。

Option Explicit



Const SUCCESS = 0

Const ERROR = 1

Const WARNING = 2

Const INFORMATION = 4

Const AUDIT_SUCCESS = 8

Const AUDIT_FAILURE = 16



Call Main()



Sub Main()

  Dim objShell

  Dim objArgs

  Dim result

  Set objArgs = WScript.Arguments

  If objArgs.Count <> 2 Then

    Call Usage()

  Else

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

    result = CheckEventType(objArgs(0))

    If result > -1 Then

      objShell.LogEvent result, objArgs(1)

      WScript.Echo "イベントを記録しました."

    Else

      Call Usage()

    End If

    Set objShell = Nothing

  End If

  Set objArgs = Nothing

End Sub



Function CheckEventType(strEventType)

  Dim blnFlag

  Dim intEventType

  

  blnFlag = False

  

  intEventType = CInt(strEventType)

  

  Select Case intEventType

    Case SUCCESS : blnFlag = True

    Case ERROR : blnFlag = True

    Case WARNING : blnFlag = True

    Case INFORMATION : blnFlag = True

    Case AUDIT_SUCCESS : blnFlag = True

    Case AUDIT_FAILURE : blnFlag = True

  End Select

  If blnFlag <> True Then

    intEventType = -1

  End If

  CheckEventType = intEventType

End Function



Sub Usage

  WScript.Echo "[Command Error!]"

  WScript.Echo "CScript.exe CreateEvent.vbs EventType Message"

  WScript.Echo "  EventType"

  WScript.Echo "     0 : SUCCESS"

  WScript.Echo "     1 : ERROR"

  WScript.Echo "     2 : WARNING"

  WScript.Echo "     4 : INFORMATION"

  WScript.Echo "     8 : AUDIT_SUCCESS"

  WScript.Echo "    16 : AUDIT_FAILURE"

  WScript.Echo "  Ex"

  WScript.Echo "    CScript.exe CreateEvent.vbs 1 ""Create Event Test."""

End Sub

使用方法はコマンド プロンプトで「C:\>CScript.exe CreateEvent.vbs 1 "Error"」と入力します。

コマンド プロンプトの実行例

イベントの確認はイベント ビューアの [Application] を見ることで確認できます。

イベント ビューアでの確認例

ページのトップへ

MOM 2005 アラートの確認

イベント発生で作成したいイベントが先ほど作成した [ルール] で検知できるか [オペレータコンソール] で確認します。

MOM 2005 オペレータ コンソール

これで、対象のコンピュータ上で発生したイベント検知して、アラートして通知できる管理パックの基礎ができましたので、次は作成した [ルール グループ] を [管理パック] としてエクスポートして、別の MOM 2005 に展開できるための準備をします。

ページのトップへ


目次

著者

小川 貢小川 貢

株式会社 CRC ソリューションズ 
ERP システム事業部所属
PASSJ Web テクノロジー分科会
ボードリーダー
MVP for SQL Server