bunun yerine
for i = 1 to objrs.recordcount
if not objrs.eof then

bunu ekle
while not objrs.eof


ve bunun yerine
end if
objrs.movenext()
next

bunu
objrs.movenext()
wend