---
title: "Online-check"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/53172-online-check"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "NoMaster"
published: "2002-09-13T21:26:11.000Z"
updated: "2002-09-13T21:26:11.000Z"
replies: 0
views: 144
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/53172-online-check"
---

# Online-check

## #1 — NoMaster, 2002-09-13T21:26Z

Hej! Har en lite säregen variant av onlinecheck som funkar bra så länge användarna loggar ut:

```
'Kollar användare och sätter mitt recset ID till en session
if not RecSet.EOF then
	sql = "upDate anvandare set status = true where anvandarnamn = '" & username & "' AND losenord = '" & password & "'"
 	objConn.execute(sql) 
	RecSet("datum") = Now
	RecSet.Update
	Session("id") = RecSet("ID")
	Session.TimeOut = 45
	Session("login") = "ok"	
     	Response.Redirect "index.htm"
End If
```

```
'Det fungerar bra att logga ut med en länk.
if not RecSet.EOF then
	sql = "upDate anvandare set status = false Where id = " & id
	objConn.execute(sql) 
 	session.abandon
	Response.Redirect "utloggad.asp"
End If
```

```
'men när användarna stänger ner webläsaren 
'utan att logga ut ändras inte status till false. 
'Därför provade jag såhär:
if session("id") = "" then
	Do Until RecSet.EOF
		If RecSet("status") AND DateDiff("n", RecSet("datum"), Now) > [b]1[/b] Then
			sql = "upDate anvandare set status = false"
			objConn.execute(sql) 
		end if
	Loop	
Else		
		RecSet.Filter = " ID = " & session("id")
		RecSet("Datum") = Now
		RecSet.Update
end if
```

Det fungerar alltså inte ens när man uppdaterar sidan efter 1 minut som den ju står på nu i testsyfte.. Nån som har nåt tips?

edit:
den sista koden inkluderar jag alltså på alla sidor som hör till inloggade avdelningar..

Permalänk: https://www.webforum.nu/p/53172

---

Tråden på webben: https://www.webforum.nu/amne/asp/53172-online-check