Daten via ODBC in Access ohne DSN

[Fuerchau]

In VBA musst du dir die MSADO-Objekte als Verweise hinzufügen.
Dann kannst du mit Connection-, Command- und Recordset-Objecten die Daten lesen und in deine Tabellen schreiben.

Aber DSN's benötigst du nur zur Entwicklungszeit.
Wenn du eine Verknüpfungstabelle erstellst zieht sich Access automatisch die Verbindungsfolge in die Eigenschaften der Tabelle.

Du kannst dann ganz normale Anfügeabfragen erstellen und verwenden.

[ambix]

Hi,

erstmal danke für die schnelle Antwort!
Ich habe mich ein bisschen in der MS Syntax verheddert, ich meinte nicht standalone VBA sondern Code innerhalb eines Access Moduls.

Was ich hier völlig problemlos hinbekomme, ist ein Recordset ohne DSN mit den benötigten Daten zu füllen und dann in einer Schleife für jeden einzelnen Satz ein AddNew in die Access Tabelle zu machen. Aber das dauert eeeeeewig!

Wenn ich aber z.B. das hier nutze:
DoCmd.RunSQL "SELECT * INTO AccessTable FROM [ODBC;DSN=as400dsn].as400lib.as400table"

sind die Sätze innerhalb von Sekunden drinne. Aber wie gesagt, DSN will ich ja gerade nicht...

leider immer noch ratlos
frank

[Fuerchau]

Schau dir die Syntax des Connection-Strings genauer an:

Driver={DriverName};System=MySys;DBQ=MyLib;CMT=0; User=MyUser;Password=MyPass;

Wenn du eine Tabelle verknüpfst, kannst du dir die Verbindungsfolge in den Tabelleneigneschafte ansehen.

[ambix]

Himmel, ich habs:

Es fehlte der Parameter MGDSN=0!
Das funktioniert jetzt einwandfrei:

DoCmd.RunSQL "SELECT * INTO AccessTable FROM [ODBC;Driver={iSeries Access ODBC Driver}; SYSTEM=as400ip; DBQ=as400lib; UID=user; PWD=pwd; MGDSN=0].as400table"

Das hat Nerven gekostet...


merci vielmals
frank