Taliho !
Ben bezig een database leeg te sleuren, alleen het werkt niet. Ik heb niet een idee waarom. Ik ben bezig om hem in access in een recordset te dumpen, maar dat wil niet. De database zelf is Btrieve.
Hieronder de (VBA) code
Bovenstaand zou moeten werken, althans met een Access database werkt hij wel. Dan krijg ik mooi alle gegevens op een rijtje. Nu echter niet. De recordcount geeft een uitkomst van -1. Dit houdt volgends de ADO-API van MS in dat de ADO niet kan zien hoeveel records er zijn.
Nu is dat niet zo'n probleem, als ik er daarna maar door heen kan wandelen. Dat doet hij echter ook niet. Hij geeft dan een foutmelding dat zowel BOF als EOF waar zijn, of de huidige record is verwijdert.
Tweede oplossing van MS, is dat iets vaags m.b.t. de cursor. Ik heb alle cursors geprobeerd, maar krijg immer dezelfde foutmelding.
Iemand een idee?
Ben bezig een database leeg te sleuren, alleen het werkt niet. Ik heb niet een idee waarom. Ik ben bezig om hem in access in een recordset te dumpen, maar dat wil niet. De database zelf is Btrieve.
Hieronder de (VBA) code
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| Dim conBtrieveDatabase As New ADODB.Connection
Dim rstGegevens As New ADODB.Recordset
conBtrieveDatabase.Open "DSN=NOOS;UID=;PWD="
rstProjecten.Open "SELECT * FROM NOOSACT", conBtrieveDatabase, adOpenStatic
Debug.Print rstGegevens.Fields.Count
Debug.Print rstGegevens.RecordCount
While rstGegevens.EOF = False
rstGegevens!ActId
rstGegevens.MoveNext
Wend |
Bovenstaand zou moeten werken, althans met een Access database werkt hij wel. Dan krijg ik mooi alle gegevens op een rijtje. Nu echter niet. De recordcount geeft een uitkomst van -1. Dit houdt volgends de ADO-API van MS in dat de ADO niet kan zien hoeveel records er zijn.
Nu is dat niet zo'n probleem, als ik er daarna maar door heen kan wandelen. Dat doet hij echter ook niet. Hij geeft dan een foutmelding dat zowel BOF als EOF waar zijn, of de huidige record is verwijdert.
Tweede oplossing van MS, is dat iets vaags m.b.t. de cursor. Ik heb alle cursors geprobeerd, maar krijg immer dezelfde foutmelding.
Iemand een idee?
Ceterum censeo Carthaginem esse delendam