Hallo,
ich habe ein Front-end und eine Back-end DB.
Die BAck-end (Daten - DB) ist PAsswortgeschützt.Jetzt will ich in VBA per CurrentDb.OpenRecordset(„Name der Tabelle“, dbOpenDynaset) darauf zubgreifen, wird aber wg. Fehlendem Passwort verhindert. Wo muss das Password hin??
Hallo,
na ja da gibt es 2 verschiedene Moeglichkeiten:
- Indem du die CurrentDB komplett aus dem Spiel laesst:
Dim wrkJet as Workspace
Dim db as Database
Set wrkJet = CreateWorkspace("", „Admin“, „“, dbUseJet)
Set db = wrkJet.OpenDatabase(„MeinPfadZurDB“, False, False, „
WD=MeinPassword“)
db.OpenRecordSet(…)
Oder 2. indem du die Verknuepfung aus einer VBA-Routine anlegst
Dim tblDef as TabelDef
Set db = CurrentDB
tblDef = db.CreateTableDef(„MeinTabellenName“)
tblDef.Connect = „;DATABASE=MeinBackEnd.mdb;TABLE=TabellenNameInBackEnd:stuck_out_tongue_winking_eye:WD=MeinPassWord“
db.TabelDef.Append tblDef
Das sollte das Problem loesen
Tschau
Peter
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]