Registry key Exists [Resolved]

[MikkyThomeon]

Thanks Brian. This issue is resolved with a simple solution!!!

'---------------------------------------------------------------------------------------
' Procedure : IsDriverInstalled
' DateTime  : 2004/02/25 12:48
' Author    : Administrator
' Purpose   : Checks if the uninstall key exists - this indicates that the
'             MyODBC driver has been installed on the target system
'---------------------------------------------------------------------------------------
'
Function IsMyODBCInstalled() As Boolean
    Dim hKey As Long
    If RegOpenKeyEx(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\MySQL Connector/ODBC 3.51", 0, 1, hKey) = ERROR_SUCCESS Then
        IsMyODBCInstalled = True
        RegCloseKey hKey
    Else
        IsMyODBCInstalled = False
    End If
End Function