Using Cookies And DB In Session_OnEnd

In my site I have a users system, when a user loges in his ID is placed in his cookies (cookies("uid")) so what I am trying to do is write a code in the Global.asa that will write in my DB whenever a loged user session starts and ends.

my problem is that the Session_OnEnd event does not support the use of cookies and even worse then that it does not support the CreateObject method in the Server Object with wich I connect to my DB.

So this is my code in the Global.asa, If you guys have any idea on how to make this code work, despite the disadvantages the Session_OnEnd Event has...

<script language="vbscript" runat="server">
Sub Application_OnStart
Dim dbpath
dbpath = Server.Mappath("data") & "db.mdb"
application("CnStr_Main") = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbpath
End Sub

sub Session_OnStart
If request.cookies("uid")<>"" then
Dim tmpconn,tmpRS,tmpDSNName,tmpsql
Set tmpconn = Server.CreateObject("ADODB.Connection")
Set tmprs = Server.CreateObject("ADODB.Recordset")
tmpDSNName = application("CnStr_Main")
tmpconn.Open tmpdsnname
tmpsql = "SELECT * FROM users WHERE id=" & request.cookies("uid")
tmprs.open tmpsql,tmpconn,3,3
if not tmprs.EOF then
tmprs(12) = 1
tmprs.update
end if
tmprs.close
tmpconn.close
end if
end sub

sub Session_OnEnd
If request.cookies("uid")<>"" then
Dim tmpconn,tmpRS,tmpDSNName,tmpsql
Set tmpconn = Server.CreateObject("ADODB.Connection")
Set tmprs = Server.CreateObject("ADODB.Recordset")
tmpDSNName = application("CnStr_Main")
tmpconn.Open tmpdsnname
tmpsql = "SELECT * FROM users WHERE id=" & request.cookies("uid")
tmprs.open tmpsql,tmpconn,3,3
if not tmprs.EOF then
tmprs(12) = 0
tmprs.update
end if
tmprs.close
tmpconn.close
end if
end sub
</script>