global.asa

[Dylandog]

hola, quiero que al terminar la session de un cliente por timeout se ejecute un porceso que borre un dato del cliente que tengo almacenado en una base de datos... probe el siguiente codigo y no me funciona:

Sub Session_OnEnd()
Application("NumSesion") = Application("NumSesion") - 1
rut=session("id")

Set miconexion = Server.CreateObject("ADOdb.Connection")
miconexion.Open "DRIVER={Microsoft Access Driver (*.mdb)};pwd=koge ; DBQ=" & Server.MapPath("rut.mdb")
set mir1=Server.CreateObject("ADODB.Recordset&quo t;)
set mir1 = miconexion.execute("delete * from cli where idcli = '" & id & "'")

End Sub


¿en que puede estar fallando?

ayuda porfa!!

[urjose]

hola, esta excelente lo que pretendes ahora bien si te sale espero que lo aportes para los que lo necesitamos, entrando al tema de tu pregunta

quita esta linea

set mir1=Server.CreateObject("ADODB.Recordset&quo t;)

y en esta de donde recoges la variable id?


set mir1 = miconexion.execute("delete * from cli where idcli = '" & id & "'")

saludos

[urjose]

aclaro

set mir1 = miconexion.execute("delete * from cli where idcli = '" & id & "'")

la linea anterior jala o funciona sin que crees el recordset es por ello que te digo que quites la linea donde creas el recordset

salu2