Halloj,
Jag får inte detta att funka:
Jag vill kontrollera hur länge medlemmarna på min site har varit online, genom att använda inloggning och utloggning. Vid inloggningen ska ett fält ändras till online, och ett annat fält ska uppdateras till vid vilken tid han loggade in. Med global.asa vill jag sedan sätta online till nej, och kontrollera hur länge han var online.
login::
-----------
Session("usrID") = objRS("id")
Session("usrName") = objRS("name")
sSQL = "UPDATE users SET online = 'Ja', online_nu = '" & Now & "' WHERE nickname = '" & objRS("name") & "'"
objC.Execute(sSQL)
global.asa::
-----------
Sub Session_onEnd
set objC = Server.CreateObject("ADODB.Connection")
objC.Open "DSN=dsnen"
sSQL = "SELECT online_nu, online_tid FROM users WHERE name = '" & Session("name") & "'"
set objRS = objC.Execute(sSQL)
if Not objRS.EOF then
minutes = getMinutes(objRS("online_nu"))
sSQL = "UPDATE users SET online_tid = '" & cInt(objRS("online_tid")) + minutes & "', online = 'Nej' WHERE nickname = '" & Session("name") & "'"
objC.Execute(sSQL)
end if
objRS.Close
objC.Close
set objRS = Nothing
set objC = Nothing
End Sub
Jag får inga felmeddelanden eller något... Kan det bero på att jag i Session_onend kallar på Sessionen med namnet, den kanske är tom?
Hoppas nån kan hjälpa mig fort :)
[redigerat]
Jag har en funktion i global.asa, utanför någon sub. Kan det bero på det?[/redigerat]
------------------
---
/* LilleSkutt */
[Redigerat av LilleSkutt den 12 mar 2001]