Type Property, Value class

Description

Type of the registry value.

Syntax

vType = Value.Type
Value.Type = vType

Returns

ValueType - Registry value types.

Remarks

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.

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

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