A ver si vosotros veis el error. No me va el método RecordCount

un_tio · #1 (**permalink**) 15/03/2005, 21:07

Y creo que en algún momento he podido usarlo sin ningún problema (lo digo por descartar el que mi máquina no lo soporte). Me refiero a contar el número de registros de un recordset, con (si el recordset se llama oRS) oRS.RecordCount.

Código:

<body>
Pruebas con el objeto Recordset.
<%
Set oConn=CreateObject("ADODB.Connection")
oConn.Open "Provider=SQLOLEDB; Data Source=xxxx; Initial Catalog=xxxxxx; User Id=xxxxxx; Password=xxxx;"
SQL="SELECT * FROM Zona"
Set oRS=oConn.Execute(SQL)
Response.Write(oRS(1))
Response.Write(oRS.RecordCount)
for i=1 to oRS.RecordCount
Response.Write(oRS(i))
oRS.MoveNext
Next
oRS.close
oConn.close
Set oConn=Nothing
Set oRS=Nothing
%>

Me sale aparte del nombre de un campo (luego sí tiene datos grabados el Recordset), que el oRS.Count vale -1 (valor que da cuando o hay error o el Recordset está vacío) y por tanto no ejecuta el for. ¿Alguien sabe por qué me da -1, cuando en realidad sí que tiene registros?

sjam7 · #2 (**permalink**) 15/03/2005, 21:14

checa este articulo
http://www.aspfacil.com/vertruco.asp?id=3

un_tio · #3 (**permalink**) 16/03/2005, 19:29

Cita:

Iniciado por sjam7

checa este articulo
http://www.aspfacil.com/vertruco.asp?id=3

¡Muchas gracias! Lo he leído y efectivamente es eso. En cuanto tenga tiempo lo pruebo.

un_tio · #4 (**permalink**) 18/03/2005, 21:36

Me da error con este código:

Código:

SQL="SELECT * FROM prueba"

' 1 = adOpenKeyset
rs.CursorType=1
rs.Open SQL, oConn

Response.Write( rs.RecordCount & " encontrados.")

rs.Close
oConn.Close
set rs=nothing
set oConn=nothing

El error es éste:

Cita:

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: ''

Y buscando en internet llego a:

http://www.us.es/foros/read.php?f=54&i=87&t=87
http://www.asptutor.com/foros/topic....orum_Title=ASP

Donde se dice que tengo que crear el objeto.

g_susdaniel · #5 (**permalink**) 18/03/2005, 23:32

el q tienes arriba

Set oConn=CreateObject("ADODB.Connection")

un_tio · #6 (**permalink**) 19/03/2005, 14:44

No, jaja, no hice ninguna pregunta. Dije que los links esos eran donde se decía que debía crear el objeto. Y yo creo que se refieren al objeto oRS. No tengo muy claro cómo crearlo y dejarlo todo para que funcione bien, pero gracias (sé que mi mensaje quedó raro pues no puse pregunta al final. Estaba simplemente apuntando cosas, y si alguien quería ayudarme, bienvenido era :P).

Así he conseguido que me vaya:

Código:

SQL="SELECT * FROM Tabla"
Set rs=oConn.Execute(SQL) 'nueva

rs.Close	
rs.CursorType=1	
rs.Open		


Response.Write( rs.RecordCount & " encontrados.")
Response.Write(rs(0))


rs.Close
oConn.Close
set rs=nothing
set oConn=nothing

Saludos