WMI Fun !! 〜 WMI に興味がある方・システム管理者は必見です! 〜 |
|
|
WMI Fun !! > WMI Step > WMI のメソッドを使ってみよう |
Panasonic Let'snote を長年愛用しています、その理由は My Let'snote で…
中古車買うならやっぱり IT 関連情報を気軽に知りたい方へ、 WMI のメソッドを使ってみよう - WMI StepTopics
WMI ではプロパティによる情報の取得だけではなく、メソッドを使用したアクションを実行することも可能です。
Sample Code
Private Sub Command1_Click()
Dim PrcSet As SWbemObjectSet Dim Prc As SWbemObject Dim Locator As SWbemLocator Dim Service As SWbemServices Dim MesStr As String Set Locator = New WbemScripting.SWbemLocator Set Service = Locator.ConnectServer Set PrcSet = Service.ExecQuery _ ("Select * From Win32_Process Where Description=""notepad.exe""") For Each Prc In PrcSet Prc.Terminate MsgBox "PIDが" & CStr(Prc.ProcessId) & "のメモ帳を終了しました。" Next Set Prc = Nothing Set Service = Nothing Set Locator = Nothing End Sub
![]() Comment
まず実行する前にメモ帳を複数起動して置いてください。起動がすんだら実行しましょう。実行すると「PID が xxx のメモ帳を終了しました。」と言うメッセージが表示されメモ帳のプロセスがなくなっていることがわかります。 今回ポイントになる部分は、 ![]() |
ご意見・ご要望・ご感想をこちらのアンケートからお待ちしています |
∧ ページの先頭へ… |