サンプル投稿用掲示板　　VB2005 〜 用トップページ　　VB6.0 用 トップページ 実行中の他のアプリのファイルのパスの取得(VB6.0) ( No.0 ) 　[親スレッドへ] 日時： 2007/07/16 05:51 名前： 花ちゃん *********************************************************************************** * カテゴリー：[他のアプリ関係][][]   　                                           * * キーワード：フルパス,Path,他のEXE,起動中,プログラム,　　　　　                  * *********************************************************************************** 元質問：実行ファイルのパスの取得 - simo 　2004/08/23-16:48 No.90 実行中の他のアプリケーションのパスを取得するにはどうしたらよいのでしょうか？ -------------------------------------------------------------------- Re^3: 実行ファイルのパスの取得 - 花ちゃん  2004/08/23-19:45 No.105 -------------------------------------------------------------------- 下記を試して見て下さい。 Private Sub Command1_Click()     Dim colProcesses As Object     Dim objProcess   As Object     Set colProcesses = GetObject("winmgmts:").ExecQuery("select * from win32_process")     For Each objProcess In colProcesses         Debug.Print objProcess.ExecutablePath     Next     Set colProcesses = Nothing End Sub 参考サイト　　　　検索キーワード[ExecQuery("select * from win32_process")] http://www.microsoft.com/japan/technet/scriptcenter/resources/qanda/jun06/hey0601.mspx 実行結果 C:\Program Files\Internet Explorer\iexplore.exe Null C:\PROGRA~1\LOGOVI~1\KoryaIP\KEWEBS~1\KEWEBS~1.EXE C:\WINDOWS\System32\svchost.exe C:\Program Files\Internet Explorer\iexplore.exe C:\WINDOWS\system32\cidaemon.exe C:\Program Files\Microsoft Visual Studio\VB98\VB6.EXE Null

　[スレッド一覧へ]　[親スレッドへ]