- WMI Fun !! -|WMI Step|WMI Sample|WMI Reference|WMI Library|Links|About WMI Fun !!
Home > WMI Sample > イベントログの内容を取得する
オトクなグルメ情報ならホットペッパー!、クーポン券をゲットしよう
PC関連新製品情報をゲットしたい方はキーマンズネットにアクセス!!
イベントログの内容を取得する: Win32_NTLogEvent
Topics

イベントログの内容を取得するサンプルです。Win32_NTLogEventクラスを使用します。


Sample Code (VB6)

Private Sub Command1_Click()

Dim EveSet As SWbemObjectSet
Dim Eve As SWbemObject
Dim Locator As SWbemLocator
Dim Service As SWbemServices
Dim MesStr As String

Set Locator = New WbemScripting.SWbemLocator
Set Service = Locator.ConnectServer

Set EveSet = Service.ExecQuery _
("Select * From Win32_NTLogEvent Where Logfile='System' " & _
"And TimeGenerated > '2003/06/25'")

For Each Eve In EveSet

MesStr = MesStr & Eve.EventCode & ":" & Eve.Message

Next

MsgBox "指定した期間内のイベントログの内容です。" & vbCrLf & _
vbCrLf & MesStr

Set EveSet = Nothing
Set Eve = Nothing
Set Locator = Nothing
Set Service = Nothing

End Sub


Comment

実行すると2003年6月25日以降に発生したシステムのイベントログを全て表示します。WQLで様々な条件を指定することで取得したい内容だけのログを取り出すことが可能です。

分類:Categoryプロパティ
イベントID:EventCodeプロパティ
ソース:SourceNameプロパティ
種類:EventTypeプロパティ

EventTypeプロパティで帰ってくる値は以下のような意味があるようです。

1: エラー
2: 警告
3: 情報
4: 監査成功
5: 監査失敗

Win32_NTLogEvent クラスに関連するサンプルは他に、

  • イベントログ(セキュリティ)の内容を取得する
  • を紹介しています。
    なおWMIの使い方(VB6,VBS,VB.NET,VC#,PowerShell対象)に関してはWMI Stepも参考にしてみてください。


    Latest sample information

  • SQL Server 2008のインスタンス情報を取得する
  • SQL Server 2008のバージョンやその他プロパティ値を取得する
  • プロセッサ(CPU)の使用率を取得する
  • ネットワークアダプタにデフォルトゲートウェイアドレスを設定する
  • ネットワークアダプタにDNSアドレスを設定する

  • ご意見・ご感想をこちらのアンケートからお待ちしています
    解らないIT/パソコン用語はIT単語帳で調べてみては?登録無料で使えます

    - WMI Fun !! -
    http://www.wmifun.net/
    Microsoft社のテクノロジーであるWMI(Windows Management Instrumentation)の使い方を
    Visual Basicを使ってのんびり公開しています
    VBや.Net Framework(VB,C#)以外でもWSH(VBS)やPowerShellなどのスクリプトでも使えますよ!
    資産管理や監視業務の効率化、システム系ツール開発にお勧めです

    This web site created by Toh.
    Copyright(C) 1997-2010 WMI Fun !!. All rights reserved. このサイトへのリンクはフリーです
    ∧ ページの先頭へ…