global.asa problems

[MikeBronner]

I tried using the global.asa file, which contains the following:

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Session_OnEnd
SET conn = SERVER.CREATEOBJECT(&quot;ADODB.Connection&quot
conn.OPEN &quot;DRIVER=SQL Server;SERVER=mssql.homestead.wellsfargo.com;Trusted_Connection=No&quot;,&quot;my_user_id&quot;,&quot;my_password&quot;
SET resultSet = ExecStmt(&quot;UPDATE users SET logged_on = 0 WHERE user_id = &quot; & SESSION(&quot;login&quot)
conn.CLOSE
SET conn = NOTHING
END SUB
</SCRIPT>

However, it doesn't work. Do you see anything I am missing? One thing I am wondering is if I can reference SESSION elements in the OnEnd section.

My intent is to update the database to reflect who is logged in and who isn't. So I want the Session_OnEnd to do this for me when the user ends his or her session by closing the browser or timing out.

Thanks for all your help! Take Care,
Mike

 

[rac2]

What is ExecStmt()?

Maybe -

Dim cmdUpdate
Set cmdUpdate = Server.CreateObject("ADODB.Command")
cmdUpdate.ActiveConnection = conn
cmdUpdate.CommandText = "UPDATE users SET logged_on = 0 WHERE user_id = " & SESSION("login")
SET resultSet = cmdUpdate.Execute()

 

[GIGN]

This should work - it is one of the only things you can do on_end though - FileSystem seems to be unavailable.

Are you sure you have waited for re-compile?

[bb]

 

[MikeBronner]

rac2, thanks for pointing that out. I totally spaced that I had a custom function in there. I fixed that and it now works perfectly ;-) Take Care,
Mike