MOTOBIT.COM - ASP upload, IIS utility List all binary values within a key

Sample for RegEdit.Value.Type | Changes | Purchase | Download

Examples

List all binary values within a key 
Const vtBinary = 3

Sub ListBinaryValues()
  Dim Reg
  Set Reg = CreateObject("RegEdit.Server")
  
  'get a specified key
  rListBinaryValues Reg.GetKey("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion")
End Sub

Sub rListBinaryValues(Key)
  Dim SubKey, Value
  
  'List all values under the key
  For Each Value In Key.Values
    'type value name and path if the value is of a binary type
    If Value.Type = vtBinary Then
      Wscript.Echo Value.Key.Path & ":" & Value.Name
    End If
  Next
  
  'List all subkeys.
  For Each SubKey In Key.SubKeys
    rListBinaryValues SubKey
  Next
End Sub

Other links for the List all binary values within a key sample

RegEdit.Value

Represents one value from windows registry

RegEdit

Intuitive, easy to use COM interface to windows registry. Set of classes to read/enumerate/modify windows registry keys and values from ASP, VBS and T-SQL.

© 1996 - 2009 Antonin Foller, Motobit Software | About, Contacts | e-mail: info@pstruh.cz