Tweet
Hallo...
ich habe mit ADO angefangen und suche zur Zeit noch Infomaterial wie man das richtig macht.
Auf meinem Form habe ich ein ADOConnection, 2 ADOQuery und 2Databases. Über ADOConnection erzeuge ich über Microsoft Jet 4.0.... einen Verbindung auf eine *.mdb. Nun wenn ich Connected habe greife ich auf die Tabelle der Datenbank mit beiden ADOQuery zu. Das mache ich folgendermassen.
<Pre>
with ADOQuery do
begin
Close;
SQL.Clear;
SQL.Add(Format(ALL,[Edit1.Text]));
Open;
with xyDatabase.Dataset do
begin
First;
while not EOF do
begin
if Uppercase(FieldByName('Status').AsString)='BREAK' then
begin
Inc(P_Anz);
Pause:=Pause+FieldByName('Pause').AsDateTime;
end;
end;
end;
end;
</pre>
Ich rufe diese Funktion 2 mal hinter einander auf und bekomme dann immer Meldung, das die Daten entweder EOF oder BOF sind. Wenn ich das ADOConnectedauf false und dann wieder auf true setzte ist es nicht. Das dauert aber sehr lange.Wie kann ich das umgehen.
Danke Rene
ich habe mit ADO angefangen und suche zur Zeit noch Infomaterial wie man das richtig macht.
Auf meinem Form habe ich ein ADOConnection, 2 ADOQuery und 2Databases. Über ADOConnection erzeuge ich über Microsoft Jet 4.0.... einen Verbindung auf eine *.mdb. Nun wenn ich Connected habe greife ich auf die Tabelle der Datenbank mit beiden ADOQuery zu. Das mache ich folgendermassen.
<Pre>
with ADOQuery do
begin
Close;
SQL.Clear;
SQL.Add(Format(ALL,[Edit1.Text]));
Open;
with xyDatabase.Dataset do
begin
First;
while not EOF do
begin
if Uppercase(FieldByName('Status').AsString)='BREAK' then
begin
Inc(P_Anz);
Pause:=Pause+FieldByName('Pause').AsDateTime;
end;
end;
end;
end;
</pre>
Ich rufe diese Funktion 2 mal hinter einander auf und bekomme dann immer Meldung, das die Daten entweder EOF oder BOF sind. Wenn ich das ADOConnectedauf false und dann wieder auf true setzte ist es nicht. Das dauert aber sehr lange.Wie kann ich das umgehen.
Danke Rene
Comment