[VBA-Access] ODBC-User wechseln

Tholas

Grünschnabel
Hallo,

ich hab ein kleines Problem. Ich habe hier eine ODBC-Anbindung mit verschiedenen Usern, die auf verschiedene Datenbereiche einsehen können. Die Struktur ist identisch aufgebaut, so daß ich vor hatte, ohne die Anwendung neu zu starten den ODBC-User über die Connect-Eigenschaft zu ändern.

Connectstring = "ODBC;DSN=Datenquelle;UID=User;PWD=Password"
' Datenquelle, User sowie Password mit realen Werten gefüllt; Datenquelle jedoch
immer identisch!

' Tabelle neu einbinden, die für ALLE User lesbar ist.
Set db = CurrentDb
Set Dummy = db.CreateTableDef("Tabelle")
Dummy.Connect = Connectstring
Dummy.SourceTableName = "Tabelle"
CurrentDb.TableDefs.Delete "Tabelle"
db.TableDefs.Append Dummy

Problem ist, daß ich bei einem Wechsel nicht die Bereiche kriege, für die der Benutzer eigentlich zugelassen ist; ODBC meldet mir, daß die Tabellen nicht gefunden werden. Starte ich die Anwendung neu, melde mich gleich mit dem anderen User an, funktioniert es...

Ich hoffe, mir kann jemand helfen, damit ich die Anwendung nicht immer neu starten muß.

bye, Tholas
 

Neue Beiträge

Zurück