Para que el if si el while ya lo cubre?
Código:
Set RsDatos = Server.CreateObject("ADODB.RecordSet")
SQL="Select * From Tabla"
RsDatos.Open SQL, Conexion
do while not RsDatos.eof
response.write(RsDatos("campo1"))
'blablabla..
RsDatos.MoveNext
loop
rsDatos.close