EXPLORERで開いているフォルダがどこかを知りたいです VB.NET

Labelにフォルダのパスが入っていて、開くのボタンを押した時に
すでに開いていればそれを表示させたいのですが、
エクスプローラがどこのフォルダを開いているか調べる方法で苦戦しております。

実行中のプロセスをすべて取得して、ひとずつプロセス名を調べて
EXPLORERだったらメインウィンドウタイトルを取得しようと思った
のですが、EXPLORERはフォルダが複数あっても１つしか出ないので
この方法ではだめだと思いました。

そこで、FindWindowというAPIでLabelにある文字列を使って
ウィンドウを探して特定しようと思ったのですが、
これだとC:\だった場合、ウィンドウタイトルに不明なボリューム名が
入るので、まずドライブのボリューム名を調べないとならないのかと
思っているのですが、これ以外の方法で開いているフォルダを調べて
System.Diagnostics.Process型の変数に割り当てる方法がありましたら、
ご教授頂ければ幸いです。

No.1 ベストアンサー 回答者： redfox63 回答日時： 2008/11/13 19:12

Shell32.dllとShDocVw.dllを参照設定して

　　Dim sh As New Shell32.Shell
　　Dim objWins As SHDocVw.IShellWindows = sh.Windows
　　For Each oWeb As SHDocVw.InternetExplorer In objWinds
　　　　Debug.Print(oWeb.LocationName & " " & oWeb.FullName)
　　Next
といった具合で取得できますよ

この回答へのお礼

redfox63様いつもご回答をありがとうございます。
今回もこの方法で完璧でした。
便利な手法を教えて頂きましてありがとうございました。

お礼日時：2008/11/13 20:34