VBS读取注册表的有关问题

VBS读取注册表的问题
我想用VBS读取出注册表中某位置下所有文件夹名字（不包括子文件夹），然后循环输出。

比如上面这个图，我想读取出HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Desktop\NameSpace 下面那5个键的名字并循环输出。

[解决办法]
So Easy:

VBScript code

Const HKLM = &H80000002strPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Desktop\NameSpace"Set oReg = GetObject("Winmgmts:\root\default:StdRegProv")    oReg.EnumKey HKLM,strPath,arr    For Each x In arr        WScript.Echo x    Next