-
iSeries Access ODBC Driver Recordset unvollständig
Hallo Forum,
ich greife über iSeries Access ODBC Driver auf eine Datenbank zu. Aus der Tabelle TABTEST will ich erst Mal alle Sätze/ Alle Spalten ablesen (bevor ich Anfange mit WHERE zu suchen)
Die ODBC ist eingerichtet, Die Verbindung kommt zustande, das Recordset weist aber nur ein Record auf (erste Zeile der Tabelle, Inhalt ist korrekt), dabei hat die Tabelle ca. 600 Zeilen. Wo ist der Hund begraben?
----Sub SQL_Query()
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.Open "Driver={iSeries Access ODBC Driver};System=xxx.xxx.x.xx; Uid=xxxx;Pwd=xxxx;"
'MsgBox conn.State
rs.Open "SELECT * FROM QU.TABTEST AS TABTEST ", conn
Dim Anzahl
Anzahl = rs.RecordCount
----
Vilelen Dank im Vorau!
David
-
Das liegt am CursorType des Recordset's.
Der Default ist ServerCursor, so dass die Daten immer erst mit dem nächsten MoveNext gelesen werden.
Beim ClientCursor werden beim Open sämtliche Daten in das Recordset geladen, was dann auchschon mal dauern kann (wenn man gerade eine Tabelle mit Millionen von Sätzen erwischt).
Spätestens wenn du mit Where-Klauseln arbeitest, solltest du mit Command-Objekten und Parametern "?" arbeiten. Das ist am effektivsten.
-
Vielen Dank!
Hast Du vlt für mich ein Beispiel mit der ClientCursor Definition?
Danke!
-
Kleine Ergänzung "CursorLocation".
Ganz einfach:
rs.CursorLocation = adUseClient
rs.Open ...
rs.RecordCount enthält dann die Anzahl geladener Sätze.
-
Klasse! Funktioniert wie gewünscht!
Vielen Dank für schnelle und professionelle Hilfe!
David
Similar Threads
-
By ubas in forum NEWSboard Programmierung
Antworten: 5
Letzter Beitrag: 18-05-16, 15:35
-
By rr2001 in forum NEWSboard Programmierung
Antworten: 6
Letzter Beitrag: 14-11-14, 11:35
-
By steffsteff in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 06-10-14, 12:18
-
By cassandra in forum IBM i Hauptforum
Antworten: 2
Letzter Beitrag: 17-09-02, 15:09
-
By SBaum in forum IBM i Hauptforum
Antworten: 5
Letzter Beitrag: 12-11-01, 16:35
Tags for this Thread
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks