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