◆ [VBScript] 指定した名前のプロセスを強制終了する
こんにチワワ。どーもボキです。

うちの環境(XP home SP3 + IE7)だけかもしれんが、IEが正常に終了しないことが多い。(プロセスが残る)
Youtubeのような動画サイトを閲覧中に終了させるとこの現象が起きるっぽい。

タスクマネージャーで一つ一つ終了させるのは面倒なので、スクリプトを作った。
ここでいうプロセス名とは、タスクマネージャーのプロセス一覧で表示される名前のこと。
' IEを強制終了する
TerminateProcess("iexplore.exe")

'-------------------------------------------------------------------------------
' 指定した名前のプロセスを強制終了
Sub TerminateProcess(ProcessName)
Dim objProcList,objProcess

Set objProcList = GetObject("winmgmts:").InstancesOf("win32_process")
For Each objProcess In objProcList
If LCase(objProcess.Name) = LCase(ProcessName) Then objProcess.Terminate
Next
End Sub



[PR]
by yozda | 2012-05-27 12:29 | プログラミング | Trackback(2) | Comments(0)
トラックバックURL : http://yozda.exblog.jp/tb/15421903
トラックバックする(会員専用) [ヘルプ]
Tracked from ( … > Z_ ̄∂ at 2012-06-16 08:49
タイトル : [VBScript] 指定したタイトルキャプションのウィ..
おはヨーグルト。どーもボキです。 [VBScript] 指定した名前のプロセスを強制終了する  ↑ 前回はプロセス名での操作、今回のはウィンドウキャプション。 キャプションに処理中の内容(ファイル名とか)が表示されるタイプのソフトであれば、 どのウィンドウを閉じるかを細かに指定できる。 ただし、今回の方法が使えるのは、WordインストールされているPCのみ。 マクロを利用しているのに、この機能が使えるのはWordのみ。使い勝手のよいExcelには入っていない。 ウィンド...... more
Tracked from ( … > Z_ ̄∂ at 2012-06-16 09:52
タイトル : [VBScript] 指定した名前のプロセスが存在するか..
おはヨーグルト。ドーモボキです。 指定した名前のプロセスが実行されているかどうか調べるスクリプト。 どうでもいいことだが、CheckProcess と 動詞+名詞 としたかったが、 VBScriptには、FileExists、ForderExists があるので、それにあわせてみた。 MsgBox ProcessExists("Firefox.exe") '--------------------------------------------------...... more
<< [VBScript] 指定プロ... RGガンダムつくった >>