Error con el movelast()

[carlitosdan]

Yo estoy conectando una base de datos con el suiente codigo:

dim saldo_anterior
dim conn,rsu,sqlu,sql2
set conn = server.createobject("adodb.connection")
conn.open "DSN=baseinca"
sqlu="SELECT saldo_caja FROM caja_perufly ;"
'se ejecuta el primer sql
set rsu=conn.execute(sqlu)
rsu.movelast()
saldo_anterior=saldo_caja
response.Write(saldo_anterior)


Y me sale el siguiente error

Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'movelast'

/ingre_gasto.asp, line 24


Alguien puede ayudarme please... la verdad no se uqe mas hacer con este lio.

[AlZuwaga]

En vez de instanciar el recordset de esa manera, trtá de hacerlo explícitamente:


dim saldo_anterior
dim conn,rsu,sqlu,sql2
set conn = server.createobject("adodb.connection")
set rs = server.createobject("adodb.recordset")
conn.open "DSN=baseinca"
sqlu="SELECT saldo_caja FROM caja_perufly ;"
'se ejecuta el primer sql
rsu.open sqlu,conn,3,3
rsu.movelast()
saldo_anterior=saldo_caja
response.Write(saldo_anterior)

[u_goldman]

Asi es, cuando tu abres un recordset mediante el metodo execute un objeto conexio, el cursor por default(me parece) que no permite este tipo de desplazamiento.

Salu2,

[orharo2003]

Si tienes el adovbs.inc utiliza el tipo de cursor: adOpenDynamico en todo caso, un 2 como tercer parametro, para que puedas moverte.

[carlitosdan]

pero mi pregunta es, no hay alguna otra forma en la que pueda ir al final de la tabla usando sql y el asp ??

[u_goldman]

Formas hay algunas, pero para que quieres otra? lo que necesitas es configurar correctamente el cursor de tu recordset.

Salu2,

[orharo2003]

lo que yo haria, y si mi diseño me lo permite, utiliza top 1 order by campo_numerico desc.

no se si me entiendas, ordeno de forma descendente y nada traigo 1 solo registro, siempre y cuando tengas algún campo en tu base que puedas ordenarlo de acuerdo al orden de entrada.

[carlitosdan]

Gracias por la ayuda, voy a probar cual de ellas es la mejor solucion...

[un_tio]

Iniciado por Al Zuwaga

En vez de instanciar el recordset de esa manera, trtá de hacerlo explícitamente:


dim saldo_anterior
dim conn,rsu,sqlu,sql2
set conn = server.createobject("adodb.connection")
set rs = server.createobject("adodb.recordset")
conn.open "DSN=baseinca"
sqlu="SELECT saldo_caja FROM caja_perufly ;"
'se ejecuta el primer sql
rsu.open sqlu,conn,3,3
rsu.movelast()
saldo_anterior=saldo_caja
response.Write(saldo_anterior)

Interesante, aunque ya había visto esa forma de hacerlo en otros lados, no sabía yo que eso se llamaba instanciar el recordset explícitamente y que traía aparejadas esas ventajas (yo lo hacía de la forma "implícita", si se llama así a como lo hizo el que ha abierto el tópic).

Yo tenía un problema similar al que abre el tópic, que era que no me iba el RecordCount, y lo solucioné así:

Código:

Set oRS=oConn.Execute(SQL)

oRS.Close	 
oRS.CursorType=1	
oRS.Open	 

numero_registros=oRS.RecordCount

[AlZuwaga]

...no sabía yo que eso se llamaba instanciar el recordset explícitamente... "implícita", si se llama así a como lo hizo el que ha abierto el tópic...

Yo tampoco se si se llama así. Y si sí, no sé si lo he dicho correctamente o justamente al revés
En fin, tampoco es para ser tan puntillosos

[u_goldman]

implicitamente, explicitamente, que mas da?

salu2,

[un_tio]

Jajaja eh, que yo no estaba siendo puntilloso, es que me había creído lo que había dicho Al Zuwaga y más bien estaba alabando sus conocimientos.