To Get All The SubKeys of a Key
To Get All The SubKeys of a Key
API Declarations
Dim sKeys() As String, iKeyCount As Long
Rate To Get All The SubKeys of a Key
(1(1 Vote))
.ClassKey = HKEY_LOCAL_MACHINE
.SectionKey = "Software"
.EnumerateSections(sKeys(), iKeyCount)
For iKey = 1 To iKeyCount
Debug.Print sKeys(iKey)
Next iKey
End With
To Get All The SubKeys of a Key Comments
No comments yet — be the first to post one!
Post a Comment