Hallo,
ich kann über VBA Access keine ODBC-Verbindungen herstellen. Hat das jemand schon mal erfolgreich gemacht? Mit den gleichen Parametern habe ich bereits PostgreSQL Unicode als ODBC-Quelle eingerichtet und erfolgreich Tabellen als Pass-Through importiert. Beim Ausführen erhalte ich jedoch unten stehende Fehlermeldung, welche meint, dass kein Passwort übergeben wurde, obwohl der String das korrekte enthält.
Der zusammengesetzte connect-String lautet:
Driver={PostgreSQL Unicode};Server = localhost;Port = 5432;Database = dbname;UID = userX;PWD = passwX
Sub con_pgsql()
Dim odbcDriver As String: odbcDriver = "Driver={PostgreSQL Unicode};"
Dim server As String: server = "Server = localhost;"
Dim db As String: db = "Database = dbname;"
Dim port As String: port = "Port = 5432;"
Dim user As String: user = "Uid = userX;"
Dim pwd As String: pwd = "Pwd = passwX"
Dim conPostgres As String: conPostgres = odbcDriver & server & port & db & user & pwd
Dim con As ADODB.Connection
Set con = New ADODB.Connection
con.Open conPostgres
if con.State = 1 Then con.Close _
Else: Debug.Print "No connection to close."
End Sub
VBA-Fehlermeldung:
Laufzeitfehler ‘…’
fe_sendauth: no password supplied
Danke!