View Full Version : AS 400 Tabelle als TXT
Hallo,
wir möchten folgendes tun. Wir haben eine AS 400 Datenbank, zugriff via sql mit Benutzernamen und Passwort, dort wolen wir eine Tabelle aus der Datenbank lokal auf dem PC als TXT speichern, wenn möglich über eine Funktion die sich aller 3 h wiederholt. Wie kann man das am besten mit VB 2005 oder anders machen bzw. hat vielleicht jemand einen Bsp.-Code den ich mit modifizieren kann?
Vielen Dank im Voraus.
CA bietet den Filetransfer (5250-Sitzung, Daten vom Host), der auch TXT ausgeben kann.
Diese TTO-Definition kann dann per Batch mit "rtopcb" übertragen werden.
Ansonsten kann auch mit VB.NET per ODBC-Reader die Daten gelesen und das Recordset per Stream ausgegeben werden.
Danke für die Antwort, die sache ist die, das wir selber nur auf die datenbank zugreifen dürfen und nix in der AS499 ändern können, uns bleibt eben nur der Weg über VB 2005 wo auch usere weitere Anwendung geschrieben ist, die Verbindung zur dtenbank hab ich bereits aber komme nicht klar, wir ich nun die Tabelle in eine TXT bekomme. Gibt es vielleicht einen Bsp.-Code wie ich den Recorder deklariere bzw. diesen handeln muss.
Bernd Wiezroek
05-09-07, 06:45
In VB kann mann SQL nutzen wenn der ODBC treiber installiert ist.
Dann kann ein einfaches VB scrtipt die Daten holen.
Ich nutze meist Excel als VB plattform. DA erstelle ich manuell über externe Daten
eine Abfrage dann rufe ich den Recorder auf und wiederhole die Abfrage.
Mit diesem Grundgerüst kann ich dann jede gewünschte Steuerung einfügen.
Bei grossen datenmengen kann man mit Access auch AS400 Tabellen direkt oder indirekt verknüpfen. Dann können die Daten weiter exportiert werden.
Für die Hostübertragung per "rtopcb" mittels TTO wird auf der AS/400 absolut nichts geändert, sondern stellt nur eine einfache Variante des Datentransfers dar, die du natürlich auch mittels VB realiseren kannst.
Warum aber etwas neu entwickeln, wenn etwas Vorhandenes das gleiche Ergebnis liefern kann ?
In einer TTO definierst du ja auchnur den SQL und die Zielausgabe (TXT, CSV, XLS).
Hallo, vielen Dank an Euch, habes es jetzt über VB sql connect gemacht, als Konsol recht gut und eigentlich auch sehr schnell bei ca. 18.000 Datensätzen über eine Telekom Standleitung.