Hjælp med Do While

Jeg har følgende Do While sætning. Den kører igennem som den skal, men når den kommer til EOF af rs6 melder den fejl.

Hvordan får jeg den til at stoppe ved rs6.eof, hvis det ikke er sådan her. Den stopper som den skal hvis jeg fjerner "and rs3a("id") = rs6("bruger_id")"


do while not rs6.EOF and rs3a("id") = rs6("bruger_id")
           
rs6.movenext
loop