デバイスマネージャーの一覧取得

質問

デバイスマネージャーの一覧取得

VB2005,Framework2使用です。

現在PCで使用されているデバイスドライバ名を表示させたく、デバイスマネージャーに表示されているデバイス名を列挙し配列に収めたいのですが、調べてみたところSetup API等を使用すると可能な様ですが、VBではどのように記述すれば良いのでしょうか？

API利用までの知識がないのでここで凄く挫折しています・・

VBではありませんが、以下のサイトが参考になると思います。
参考：http://www.usefullcode.net/2006/12/post_19.html

よろしくお願いします。

回答No.1

bluecampus · ベストアンサー

WMIのWin32_PnPEntityを使ってみるのはどうでしょうか？

Imports System
Imports System.Management ' 参照設定が必要
Module Module1
　　Sub Main()
　　　　Try
　　　　　　Dim searcher As ManagementObjectSearcher
　　　　　　searcher = New ManagementObjectSearcher("SELECT * FROM Win32_PnPEntity")
　　　　　　For Each queryObj As ManagementObject In searcher.Get()
　　　　　　　　Console.WriteLine("{0}", queryObj("Name"))
　　　　　　Next
　　　　Catch ex As Exception
　　　　　　Console.WriteLine(ex.Message)
　　　　End Try
　　End Sub
End Module

必要な情報は
http://www.anchorsystems.jp/anchor/ashp/netmon/samples/wmi_hard.html#Win32_PnPEntity.htm
を参考にしてみてください。

お礼

ご回答ありがとうございます。

他のAPIでも同様の事ができるのですね。
少しコードを改変した結果無事にデバイス一覧の列挙を配列に収めることが出来ました！
ありがとうございました。