Type of the registry value.
vType = Value.Type
Value.Type = vType
ValueType - Registry value types.
You can also change value type (for example from vtString to vtDWord) by the property. You cannot change value type if the registry value name does not exists.
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 |
Optional code by value type |
'Enum values For Each Value In MyKey.Values Debug.Print Value.Value If Value.Type = vtExpandString Then Debug.Print Value.Expanded Next |
Represents one value from windows registry
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