Microsoft VBScript runtime error \'800a01b6\'
Tengo un problema.... tengo el siguiente código:
<%
Set conex = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.RecordSet")
conex.Open "prueba"
consulta = "Select * from usuarios"
RS = conex.execute(consulta)
do while not RS.EOF ********
Response.Write (RS("login") & RS("password"))
RS.Movenext **********
Loop *********
conex.close
%>
-----------
Me envía el error
Microsoft VBScript runtime error '800a01b6'
Object doesn't support this property or method: 'EOF'
/entradausuario.asp, line 7
-------
El problema por lo que entendi, es que no puedo utilizar los recordset a gusto, por ejmplo si omito las lineas de codigo marcadas con (*) si me acceso a la base de datos y me despliega el primer registro, si incluyo las lineas de código marcadas con (*) para recorrer todos los registros..... me marca el error antes mencionado....
Gracias por su ayuda.....
<%
Set conex = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.RecordSet")
conex.Open "prueba"
consulta = "Select * from usuarios"
RS = conex.execute(consulta)
do while not RS.EOF ********
Response.Write (RS("login") & RS("password"))
RS.Movenext **********
Loop *********
conex.close
%>
-----------
Me envía el error
Microsoft VBScript runtime error '800a01b6'
Object doesn't support this property or method: 'EOF'
/entradausuario.asp, line 7
-------
El problema por lo que entendi, es que no puedo utilizar los recordset a gusto, por ejmplo si omito las lineas de codigo marcadas con (*) si me acceso a la base de datos y me despliega el primer registro, si incluyo las lineas de código marcadas con (*) para recorrer todos los registros..... me marca el error antes mencionado....
Gracias por su ayuda.....
