datenzugriff access -> as/400

[unknown123]

hallo miteinander...

würde gerne aus access den datenzugriff auf ne as/400 machen.

1.wie müsste der connection string syntaktisch genau aussehen ..

2. ist es möglich die recht grossen datenmengen in recordsets zwischen
zuspeichern ..?

vielen dank !!

[akorb]

Hallo,

zu 1. Der Zugriff erfolgt am einfachsten über den ODBC-Treiber von Client Access. Damit kann man die Dateien auf der AS400 einfach ein Access einbinden.

zu 2. Das Speichern ist möglich. Wenn man die externen Daten importiert, werden die Daten in Access gepeichert. Wenn man die externen Daten nur verknüpft, wird immer auf die AS/400 Daten zugegriffen.

Gruss
akorb

[unknown123]

client access ... sorry, kannst mir das nochmal genauer erklären.

wo ist der zu finden, systemsteuerung??

[JonnyRico]

Hi,

du musst erst mal Client Access incl. ODBC-Treiber installieren. Dann unter Windows in die Systemsteuerung in die ODBC-Verwaltung und da für jede LIB auf der AS400 eine ODBC-Quelle einrichten (System-DNS).
Dann gehst du in MS Access auf "Datei" -> "Extene Daten" -> "Importieren" oder "Verknüpfen" (wie von akorb beschrieben), wählst als Dateityp ODBC und wählst du ODBC-Quelle. Nun haste deine Daten in Access.
Per Code kannst du mit den Treiber auch nutzen:

With CN
.Provider = "IBMDA400"
.ConnectionString = "Data Source=" & Host
.Open
End With

Gruß

Sascha

[unknown123]

vielen dank schon mal.

den odbc-treiber muss ich so und so installieren, auch wenn ich mit
code auf die as/400 zugreife, oder !?

wo kann man den in der systemsteuerung bei XP finden ?

was steht für host?
muss ich meinen benutzernamen u. kennwort nicht irgendwie durchgeben ?

With CN
.Provider = "IBMDA400"
.ConnectionString = "Data Source=" & Host
.Open
End With


sorry ... fragen über fragen ... bin aber auf dem gebiet völligst daneben !
danke nochmal !

[JonnyRico]

Hi,

Host steht für den Mschinennamen oder die IP der AS/400. Wenn du keine "User ID" und kein "Password" übergibst führt Client Access eine Abfrage danach durch.

With Cn
.Open "Provider=IBMDA400;" & _
"Data source=Host;" & _
"User Id=Username;" & _
"Password=Password"
end with

Systemsteuerung XP:

Start - > Einstellungen -> Systemsteuerung -> Verwaltung -> Datenquellen (ODBC)

[unknown123]

super danke für die infos ...

hab aber ein englisches XP.

das ist aber nicht der grund warum in den menüpunkt verwaltung nicht
finden kann ... !?

[JonnyRico]

Wenn du's nun gar nicht findest kannste auch direkt die odbcad32.exe aus \Windows\System32 aufrufen

[unknown123]

klappt!
krass, bist ein spezialist !

aha und bei datasource gebe ich die installierte odbc-datei an ?

[JonnyRico]

Ich weiß gerade nicht so genau wo da Datasource steht, aber wenn du "Add" aufrufst dann musst du zuerst mal den CA ODBC-Treiber auswählen. Dann kommt das Konfig-Fenster. Oben dann den Namen eingeben. Das System sollte automatisch vorgeschlagen werden. Es muss aber vorher unter OPSNAV eingerichtet sein. Ich glaube die Bibliothek muss auch auf der ersten Seite eingetragen werden. Ich kann leider gerade nicht nachschauen weil ich hier auf dem Rechner kein CA habe.

[Fuerchau]

"Systemsteuerung->Verwaltung->Datenquellen" (analog halt in Englisch).

Die Lib's gibt man im Register "Server" an. Wichtig unter "Erweitert" das Commit abzuschalten (*NONE), da die wenigsten AS-Anwendungen mit Journal arbeiten.

[unknown123]

kann ich so auf einen taballe auf der as/400 zugreifen?

rst.Open "tblabc", cnn, adOpenKeyset, adLockOptimistic

und ...IST ES EBENSO MÖGLICH AUF EINE QUERY ZUZUGREIFEN?