enumvalues ​​из stdregprov возвращает другой список, чем regedit - PullRequest
0 голосов
/ 04 июня 2018

Я использую следующий код VBA для возврата значений ключей в ODBCINST \ ODBC Drivers.Ниже приведен список, если я смотрю в regedit, то список, который он возвращает, я не могу найти список, который он возвращает нигде.

Dim strComputer As String, strKeyPath As String, strDrivers
Dim objRegistry As Object, arrValueNames, arrValueTypes
Dim iCounter As Integer
strComputer = Environ$("computername")
strDrivers = ""
strKeyPath = "SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers"
Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
objRegistry.EnumValues HKEY_LOCAL_MACHINE, strKeyPath, arrValueNames, arrValueTypes
For iCounter = 0 To UBound(arrValueNames)
    strDrivers = strDrivers + arrValueNames(iCounter) & vbCrLf
Next iCounter
MsgBox (strDrivers)

вот список из RegEdit enter image description here

вот список из кода: enter image description here

Не понимаю?

...