Otro problema con el carrito: con una base de datos o un recordset

[HPNeo]

El error q me sale es:

ADODB.Field error '800a0bcd'

El valor de BOF o EOF es True, o el actual registro ha sido eliminado; la operación solicitada por la aplicación requiere un registro actual.

/lodhp/animals.asp, line 65

Aqui les mando el archivo

http://www.websamba.com/lodhp/pruebas/animals.zip

Es URGENTE
Gracias

[AlZuwaga]

el error lo da en esta linea?:

g=(RSlodhp.Fields("Galeones"))


Si es así, debe ser que el recordset "RSlodhp" no tiene ningún registro.

... aunque no entiendo algo... primero comprobás que el usuario exista:

Código:

sql = "SELECT * FROM Alumnos WHERE Nick = '"& txtlogin &"'"

... y si existe, continuás. Pero luego, creás otro recordset...

Código:

SQLlodhp="SELECT Nick, Galeones FROM Alumnos WHERE Nick = '"& login &"'"

... que tiene una variable distinta en el WHERE (ambas marcadas en negrita)

Además, ¿para qué creas un segundo recordset si en el primero ya estás haciendo un SELECT * FROM Alumnos?

[HPNeo]

En el primer recordset es para que el usuario entre, en el segundo es para sacar dinero que esta en una tabla.
Si hay otro problema, dimelo, o trata de arreglarlo.

[HPNeo]

Soy nuevo empleando ASP, por eso no se exactamente como usar los recordset

[AlZuwaga]

Ya te di una pista, por un lado tenés una variable llamada txtlogin y por otro una llamada login. El error que mencionás, "El valor de BOF o EOF es True, o el actual registro ha sido eliminado", ocurre cuando el objeto recordset está vacío. La variable llamada login que usás en la segunda SQL no existe, por lo tanto está vacía o nula. Y por ello, no te trae registros.

Si hay otro problema, dimelo, o trata de arreglarlo

Mejor, ya que me tomé la molestia de bajar tu zip, descomprimir el contenido, leer el ASP, buscar la línea 65 e intentar analizar un poco el tema, con la pista que te estoy dando, tratá de arreglarlo vos.

[HPNeo]

Ok, no te enojes
Gracias

[AlZuwaga]

Iniciado por HPNeo

Soy nuevo empleando ASP, por eso no se exactamente como...

Ups, perdón por el mensaje anterior. Hubiésemos empezado por ahí...

OK, cambiá esta línea:

Código:

SQLlodhp="SELECT Nick, Galeones FROM Alumnos WHERE Nick = '"& login &"'"

por esta:

Código:

SQLlodhp="SELECT Nick, Galeones FROM Alumnos WHERE Nick = '"& txtlogin &"'"

No estoy seguro que funcione a la primera, pero veamos si soluciona algo (el tema del recordset innecesario lo dejamos por el momento, primero quiero ver si ese cambio funciona)
Avisame

[HPNeo]

He modificado algunas otras cosas, ahora el problema es que la variable clave2 (porque clave es el password) no es una coleccion.
Ayuda, please
Necesitas descargar de nuevo el archivo
Gracias

[AlZuwaga]

podrías pegar el código aquí? es más cómodo

[HPNeo]

Es muy largo, son 300 y pico de lineas

[AlZuwaga]

Si, ok, pasa que es muy incómodo laburar así sin que me digas qué linea da error, etc.
además, como no dispongo de las bases de datos, no puedo hacer pruebas.

Por la descripción del error (el problema es que la variable clave2 no es una coleccion), "asumo" que el carrito no está creado.. aunque no estoy seguro.

Más que eso no puedo hacer. Lo siento.

[HPNeo]

Ok, la base de datos:
http://bb.1asphost.com/lodhp/database/diagon_alley.mdb

[HPNeo]

Lo necesito URGENTE, por favor!

[HPNeo]

La linea q me da error es:

Object required: 'carrito'

/lodhp/animals.asp, line 225

Esa linea esta por una de estas:

if carrito.Exists(id) then
carrito(id)=carrito(id)+1
else
' Si no lo aado
carrito.Add id, 1
end if

Y aqui estoy creando el carrito:

' Si no existe el carrito lo creo
' si existe lo referencio
if isobject(Session("carrito")) then
set carrito=Session("carrito")
else
set carrito = Server.CreateObject("Scripting.Dictionary")
end if

AYUDA