Hejsa!
Jeg vil lave en liste over de personer der er online på mit site...
Jeg kan hente deres navn fra en cookie, og jeg havde tænkt på følgende..
<script language="VBScript" runat="server">
Sub Session_OnStart
Application.Lock
if (Request.Cookies("TEinfo").HasKeys) then
STRNAVN = Request.Cookies("TEinfo")("NAVN")
STRNR = Request.Cookies("TEinfo")("NR")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ="
&
Server.MapPath("database/online.mdb") & ""
Set rs = Server.CreateObject("ADODB.Recordset")
LoginSQL = "Select * from online"
rs.Open LoginSQL, Conn, 1, 3
rs.Addnew
rs("navn") = STRNAVN
rs("medlemsnr") = STRNR
rs.update
rs.close
Set rs = nothing
Conn.close
Set conn = nothing
end if
Application.UnLock
End Sub
Sub Session_OnEnd
Application.Lock
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ="
&
Server.MapPath("database/online.mdb") & ""
Set rs = Server.CreateObject("ADODB.Recordset")
logudSQL = "Select * from online where medlemsnr = 1"
rs.Open LogudSQL, Conn, 1, 3
if not (rs.bof or rs.eof) then
rs.delete
end if
rs.close
Set rs = nothing
Conn.close
Set conn = nothing
Application.UnLock
****************************
Det er meningen at koden skal placere navnet på dem der er online i en DB..
og fjerne dem igen, når sessionen uddør...
Men jeg kan ikke slette deres navn, når de 'logger' af..
Det virker fint nok på en almindelig asp-side, men ikke i global.asa
Jeg ved at jeg i koden kun sletter nr. 1.. Det er bare for at teste.
Hvad gør jeg forkert?
Og skal det i det hele taget gribes helt anderledes an?
Håber på hjælp ..
Rene'
|