Some info I don't want to loose:

The registrykey object has a method called GetSubKeyNames, which will enumerate all the subkeys (folders) below the current registrykey. For instance: dim reg as registrykey=registry.localmachine.opensubkey("System\Microsoft\Windows\CurrentVersion") for each thissubkey as string in reg.GetSubKeyNames dim newreg as registrykey=reg.OpenSubKey(thissubkey) next You could even get fancy with a little recursion and step through all subkeys and child subkeys.