¿Por qué me da error?

[meru-kun]

Es que tengo un sencillo código, y por más uqe lo miro no veo por que demonios me arroja un error, pues creo que está bien.

A ver si alguien me ilumina el camino :)

Código:

For i = 66 To 90
 strSQL = "SELECT JUEGO FROM GAMES_GAMES WHERE JUEGO LIKE '"&chr(i)&"%' ORDER BY JUEGO ASC"
  set mr = myconn.execute(strSQL)
    do while not mr.eof or mr.bof
     response.write mr("JUEGO")
	 mr.movenext
	loop
Next

Y el error es: "El valor de BOF o EOF es True, o el actual registro se eliminó; la operación solicitada requiere un registro actual."

Muchas gracias

[meru-kun]

Bien, ya lo encontré. Resulta que la expresión correcta ha de ser:

Código:

For i = 65 To 90
 strSQL = "SELECT JUEGO FROM GAMES_GAMES WHERE JUEGO LIKE '"&chr(i)&"%' AND ORDER BY JUEGO ASC"
  set mr = myconn.execute(strSQL)
   if not (mr.eof or mr.bof) then
   	response.write chr(i) & "<br>"
    do while not mr.eof or mr.bof
    response.write mr("JUEGO") & "<br>"
	  mr.movenext
	loop
   end if
Next
mr.close

Cosas de la vida, porq ue otras veces no lo pongo así y va igual de bien.