ADO Tools

List all installed OLE DB providers

Global $sOutput, $oRegistry, $oKey, $sKey = "HKCR\CLSID", $i = 1
While 1
    $sSubKey = RegEnumKey($sKey, $i)
    If @error Then ExitLoop
    $sKeyValue = RegRead($sKey & "\" & $sSubKey, "OLEDB_SERVICES")
    If @error = 0 Then ConsoleWrite($sKey & "\" & $sSubKey & @TAB & RegRead($sKey & "\" & $sSubKey, "") & @TAB & RegRead($sKey & "\" & $sSubKey & "\OLE DB Provider", "") & @LF)
    $i = $i + 1
WEnd

Result:

OLE DB Providers