Hallo,
sicher, dass der Fehler nicht beim Next kommt ?.
Du könntest einen Zähler mitlaufen lassen
(vorher die Anzahl der Einträge in der
Query z.B. mit
select count(*) oder RecordCount ermitteln).
vor dem while-end dann die Prüfung
if Counter=MaxCount then break;
Heiko