如何使用vbscript讀取註冊表項的所有值？

Question

我在註冊表中的以下值

鍵： HKLM \ SOFTWARE \微軟\的Windows \ CurrentVersion \ Internet設置\接受的文件\

值：

* -> application/msword 
** -> application/vnd.ms-excel 
*** -> application/vnd.ms-powerpoint 

等

我想知道如何閱讀所有人

與wscript。外殼，regread我只能讀一個值，但我不知道該值提前...

Answer 1

嗯，我知道了

我不得不使用WMI，如：

option explicit 

const HKLM = &H80000002 

dim keyPath 
keyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\Accepted Documents" 

dim reg 

dim valueNames, types 
dim value 
dim i 

    set reg = getObject("Winmgmts:root\default:StdRegProv") 

    if reg.enumValues(HKLM, keyPath, valueNames, types) = 0 then 
    if isArray(valueNames) then 
     for i = 0 to UBound(valueNames) 
     reg.getStringValue HKLM, keyPath, valueNames(i), value 
     msgBox(valueNames(i) & "=" & value) 
     next 
    end if 
    end if 

saludos

sas