Access Frontend - MYSQL Backend Tabellen mit VBA neu verknüpfen

dbfreak2607

Neuer Benutzer
Beiträge
1
Schlage mich mit dieser Problematik schon ein paar Tage herum und habe es inzwischen fast hinbekommen.

Lediglich mit der Übergabe des Passworts im Connection-String gibt es ein Problem.
Wenn ich ein Passwort verwende, welches ganz normale Zeichen enthält funktioniert es.
Da mein Passwort einige Sonderzeichen, wie =, # und ; enthält klappt es nicht.
In diesem Fall geht das Fenster für die ODBC-Verbindung auf und der Cursor steht im Passwort-Feld.
Dieses enthält dann nur 2 Zeichen, d.h., das Passwort wurde nicht komplett übergeben

Hat jemand eine Idee, wie ich die Übergabe des Passworts gestalten muss.

Hier vielleicht noch mein verwendeter Code.

Dim db As DAO.Database
Dim tdf As DAO.TableDef

Dim t As Integer

Set db = CurrentDb
For t = db.TableDefs.Count - 1 To 0 Step -1
If db.TableDefs(t).Connect <> "" Then
db.TableDefs.Delete db.TableDefs(t).Name
End If
Next t
Set db = Nothing

Const TabCount = 1
Dim Tabellen(TabCount) As Variant
Dim i As Long
'Tabellen die Du einbinden möchtest.
Tabellen(0) = "tbl_kunden"

For i = 0 To TabCount - 1

DoCmd.TransferDatabase acLink, "ODBC" _
, "ODBC;DRIVER={MySQL ODBC 5.3 Unicode Driver};" _
& "SERVER=127.0.0.1;" _
& "port=3306;DATABASE=usr_web*****_12; " _
& "USER=**********;PASSWORD==*;**#***!", acTable, Tabellen(i) _
, Tabellen(i)
Next i
 
Werbung:
Zurück
Oben