Samples

 


Basic sample

The following sample looks up the "HKEY_CURRENT_USER\SOFTWARE\Baan\BaanConfiguration" registry key, it the asks for the "Display" subnode (which would be the "HKEY_CURRENT_USER\SOFTWARE\Baan\BaanConfiguration\Display" registry key) and prints out a few of its values.

 


Dim node As New RegNode
Dim subnode As RegNode
Dim values As RegValues

    Call node.Set(HKEY_CURRENT_USER, "SOFTWARE\Baan\BaanConfiguration")
    Set subnode = node.Nodes("Display")
    Set values = node.Values
    Debug.Print values("PosX").value
    Debug.Print values("PosY").value
    Debug.Print values("SizeX").value
    Debug.Print values("SizeY").value
    Set values = Nothing
    Set subnode = Nothing
    Set node = Nothing