---
title: "Online datum i databas."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13661-online-datum-i-databas"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ConnyFox"
published: "2002-01-08T22:22:00.000Z"
updated: "2002-01-09T16:46:00.000Z"
replies: 16
views: 233
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/13661-online-datum-i-databas"
---

# Online datum i databas.

## #1 — ConnyFox, 2002-01-08T22:22Z

Jag hadde tänk att göra en funktion som visar om en användare är online eller inte. jag har placerat en liten 0 gånger 0 pixlar stor frame med en sida i som uppdateras var 5:e minut. Om session("inloggad") = true så ska den spara datum och tid i databasen. Och sedan djämföra nuvarande datum med datumet i databasen, om det skiljer mer äm 5 minuter mellan dom är man offline annars är man online.

Fråga : hur gör man för att spara nuvarande datum i databasen?

Fråga 2 : Hur gör man för att djämföra nuvarande datum med datumet i databasen och ge olika resultat om skilnaden är mer än 5 min och mindre ?

Någon som har en annan ide till hur detta kan lösas utan global.asa så lyssnar jag mer än gärna ;)

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

## #2 — M@rtin, 2002-01-08T22:46Z

Eftersom du gör som du gör så behövs ju inte global.asa? När sessionen dör så dör den ju även om du inte har nån kod i global.asa.

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

## #3 — ConnyFox, 2002-01-09T00:08Z

Hehe jag vet! Jag påpekade bara att om någon vet ett ANNAT sätt som inte heller använder global.asa o e smidigare så lyssnar jag gärna på det :o)

Ingen som kan svara på mina frågor? =/

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

## #4 — aleborg, 2002-01-09T00:23Z

```
SQL="Update Users Set Online='"& now &"' Where UserID="& Session("UserID")
Conn.Execute(SQL)
```

om du använder access så hoppa över ' runt "& now &", har du MySQL så gör det inte

jämför:

```
SQL="Select * From Users Where date_add(Online,interval 5 minute) >= current_timestamp"
Conn.Execute(SQL)
```

Så får du fram alla som är online...

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

## #5 — ConnyFox, 2002-01-09T12:33Z

Koden för att spara datumet funkade fin fint när jag ändrat om till mina namn. Men den andra koden förstår jag inte riktigt.

jag listar upp alla användare och skulle vilja ha en text som är online när det inte är mer än 5 min och offline om det är mer, hur gör man det med den koden?

Tack iaf!

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

## #6 — aleborg, 2002-01-09T13:07Z

```
SQL="Select * From Users Where date_add(Online,interval 5 minute) >= current_timestamp"
Set onlineRS=Conn.Execute(SQL)
Do Until onlineRS.EOF
Response.Write onlineRS("Username") & "<br>"
onlineRS.MoveNext
Loop
onlineRS.Close
Set onlineRS = Nothing
```

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

## #7 — ConnyFox, 2002-01-09T13:34Z

jovisst men det där listar ju alla som är online och det var inte det jag var ute efter. Jag har redan listat samtliga medlemmar och vill ange brevid deras namn om dom är offline eller online! ;)

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

## #8 — aleborg, 2002-01-09T13:47Z

```
If date_add(RS("online"),interval 5 minute) >= current_timestamp Then 
Response.Write "Online"
End If
```

borde funka :)

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

## #9 — ConnyFox, 2002-01-09T13:57Z

Får av någon anledning detta felmedelande :

```
Kompileringsfel i Microsoft VBScript fel '800a03ee' 

')' förväntas. 

/StajlLinks 1.0/members.asp, rad 121 

If date_add(online("online"),interval 5 minute) >= current_timestamp Then
--------------------------------------^
```

jag använder nu denna sql kod

```
Set online = Connection.Execute("Select * From members Where date_add(Online,interval 5 minute) >= current_timestamp")
```

och if satsen som du sa

```
<% If date_add(online("online"),interval 5 minute) >= current_timestamp Then%>ONLINE<%Else%>OFFLINE<%end if%>
```

Vad är felet?

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

## #10 — ConnyFox, 2002-01-09T14:00Z

kom just på att vafan gör swl satsen där hehe men felet får jag fortfarande =/

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

## #11 — aleborg, 2002-01-09T14:06Z

Tanken med if satsen var att plocka ut online ifrån den SQL koden du använder för att hämta användarens info, t ex:

```
Set online = Connection.Execute("Select * From members Where MemberID="& Request.QueryString("show_user") &"")
If date_add(RS("online"),interval 5 minute) >= current_timestamp Then 
userOnline= " Online"
End If
Response.Write online("Username") & userOnline
```

Allt beror på hur du visar den andra informationen. Jag har tyvärr inte testat if satsen, men den borde funka

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

## #12 — ConnyFox, 2002-01-09T14:15Z

Det där fattar jag inte alls hur jag ska få det att funka i min loop.. =/
\*suck\* antingen så e jag trög eller så fattar jag bara inte ;)

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

## #13 — ConnyFox, 2002-01-09T14:20Z

Eller alltså jag tror att jag fattar, men jag får error på den där djävla femman hela tiden!

```
Kompileringsfel i Microsoft VBScript fel '800a03ee' 

')' förväntas. 

/StajlLinks 1.0/members.asp, rad 9 

If date_add(RS("online"),interval 5 minute) >= current_timestamp Then
----------------------------------^
```

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

## #14 — ConnyFox, 2002-01-09T15:19Z

Ingen som vet vad som är fel?

```
If date_add(RecSet("online"),interval 5 minute) >= current_timestamp Then
```

får error

```
Kompileringsfel i Microsoft VBScript fel '800a03ee' 

')' förväntas. 

/StajlLinks 1.0/members.asp, rad 9 

If date_add(RecSet("online"),interval 5 minute) >= current_timestamp Then
--------------------------------------^
```

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

## #15 — ConnyFox, 2002-01-09T15:27Z

Borde man inte behöva någon funktion som definerar vad allt det där är? för dom funktionerna finns väll knappast innbygt i asp eller?

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

## #16 — ConnyFox, 2002-01-09T16:12Z

Koden jag fick va ju heltokig :o)
Löste det iaf tillslut med lite hjälp!

```
<%
Set online = Connection.Execute("Select * From members Where nick='"& recset("nick") &"'")

onlinemin = DateDiff("n", online("online"), now)
if onlinemin <= 5 then
userOnline= " Online"
color = "#00CC00"
else
userOnline=" Offline"
color ="#FF0000"
end if
%>

<font color="<%=color%>"><%=UserOnline%></font>
```

hoppas någon kan ha nytta av detta :o)

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

## #17 — aleborg, 2002-01-09T16:46Z

Du löste det :)
Jag använder koden enbart i SQL frågor, och där funkar den! Har aldrig provat den i en If sats men nu vet jag ;)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/13661-online-datum-i-databas