レジストリの値の名前と種類を列挙する: StdRegProv - WMI Sample (VB)

Topics

レジストリの値の名前と種類を列挙するサンプルプログラムです。
名前空間が root\default、クラスが StdRegProv になります。

VBS (WSH) 版のサンプルコードはこちらで公開しています。

Sample Code

Private Sub Command1_Click()

Dim Reg As SWbemObject
Dim Locator As SWbemLocator
Dim Service As SWbemServices
Dim RegName As Variant
Dim RegType As Variant
Dim MesStr As String
Dim TypeStr As String
Dim I As Long

Set Locator = New WbemScripting.SWbemLocator
Set Service = Locator.ConnectServer(vbNullString, "root\default")
Set Reg = Service.Get("StdRegProv")

Const HKEY_LOCAL_MACHINE = &H80000002

Reg.EnumValues HKEY_LOCAL_MACHINE, _
"SOFTWARE\Microsoft\Windows NT\CurrentVersion", RegName, RegType

For I = 0 To Ubound(RegName)

Select Case RegType(i)
Case 1
TypeStr = "REG_SZ"
Case 2
TypeStr = "REG_EXPAND_SZ"
Case 3
TypeStr = "REG_BINARY"
Case 4
TypeStr = "REG_DWORD"
Case 7
TypeStr = "REG_MULTI_SZ"
End Select

MesStr = MesStr & RegName(i) & " : " & TypeStr & vbCrLf

Next

MsgBox "レジストリの値の名前と種類を列挙します。" & vbCrLf & vbCrLf & MesStr

Set Reg = Nothing
Set Service = Nothing
Set Locator = Nothing

End Sub

Comment

実行するとレジストリの値の名前と種類の列挙を行います。
レジストリ参照先は「HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion」です。EnumValues メソッドを実行すると指定したキーにある値の名前と種類が入ったコレクションが帰ってきますので、それらを分析してあげれば一覧の取得が可能です。
なお WMI の使い方(VB6, VBS, VBA, VB.NET, VC#, PowerShell を対象) に関しては、WMI Step も参考にしてみてください。(WMI 初心者・入門編としてもおすすめです。) 各種言語を使用したWMIを使用するたたき台としてソースコードテンプレートも公開しています。WMI プログラム/スクリプト作成時に役立てば…と思っています。

Recommended book

個人的にお勧めする本の紹介です。


WMI Fun !! > WMI Sample (VB) > レジストリの値の名前と種類を列挙する

WMI Fun !! > WMI Sample (VB) > レジストリの値の名前と種類を列挙する

レジストリの値の名前と種類を列挙する: StdRegProv - WMI Sample (VB)

Topics

Sample Code

Comment

Recommended book