Hvem er online

Du skal i din global.asa fil have følgende:
SUB Application_Onstart
Application("intbrugereOnline") = 0
End SUB

Sub Application_OnEnd
End SUB

Sub session_OnStart
    Application.Lock
    Application("intbrugereOnline") = Application("intbrugereOnline") + 1
    Application.UnLock
End Sub

Sub session_OnEnd
    Application.Lock
    Application("intbrugereOnline") = Application("intbrugereOnline") - 1
    Application.UnLock
End Sub

Der hvor du vil have antal brugere skrevet ud skal du indsætte følgende :
<% =Application("intbrugereOnline") %>

kan du ikke lave selve filen og pakke den ned så kan jeg bedre finde ud af det  :)
hvad bruges selve global.asa filen til  det har jeg aldrig rigtig fundet ud af???

det skal ikke være antal brugere men hvem der er online fra min db

nå for f...
Det er brugere der er logget ind ??

ja

Hmmm, hvordan logger du dem ind ???

hvad mener du hvordan logger du dem ind?

jeg er ikke så god til asp yet

Du kan f.eks. lave en variabel der
hedder: intbrugereOnline = 0

når der så er en bruger der logger ind:
intbrugereOnline = intbrugereOnline + 1

og når de logger ud:
Du kan f.eks. lave en variabel der
hedder: intbrugereOnline = 0

når der så er en bruger der logger ind:
intbrugereOnline = intbrugereOnline - 1

du kan opbevare værdien af intbrugereOnline i et .txt dokument eller i din db

ok, må jeg ikke se lidt kode ?? ;-)

jaj men det er jo kun hvormange men ikke hvem!

ja men er hos min onkel og har ikke min hp hos mig

jeg bruger sql =´select from brugere where brugernavn inner join og et eller andet til at check om brugern findes i db´en

vent lidt 2 sek så finder jeg det lige har lige fundet det

det bliver svært uden at se lidt kode.

Du kan også oprette en tabel i din db dere hedder BrugerOL

Skrive brugeren ind når vedkommende logger ind, og slette vedkommende når der bliver logget ud :-)

jeg fandt login checkern 2 sek

sql = "SELECT username, statuslevel FROM status INNER JOIN users ON status.statusid = users.status WHERE username = '" & username & "' AND password = '" & password & "' AND active = True"
Set rsUser = Server.CreateObject("ADODB.Recordset")
rsUser.Open sql, conn, 3, 3


If (not rsUser.BOF) and (not rsUser.EOF) and sqlflag <> True then
  Response.Cookies("username") = rsUser("username")
  Response.Cookies("level") = rsUser("statuslevel")
 
  if stayloggedin = "yes" then
    Response.Cookies("username").expires = #1/1/2010#
    Response.Cookies("level").expires = #1/1/2010#

sådan ser det ud

ok, øjeblik

hvis der er nogen der har en soruce kode så send den til mig på rhf@znoff.dk

jeg skal snart smutte skynd dig hvis du kan :-)

Når en bruger logger ind, skal kode+password tjekkes på en ASP side, for at se om det er rigtigt. På den side kan du:

Logger ind: lav en kolonne der hedder "online" i din "bruger" tabel id in database. Så når brugeren logger ind skal den skrive 1 i den kolonne, ud fra brugeren.

Logger ud: så skal den bare lave det om så der står 0 istedet.

Vise online brugere: her kan du bare liste de brugere hvor der står 1 i "online".

/Bjarke - (KLEIFDESIGN)
http://www.mypage.dk

Jeg ville lave en tabel mere og kalde den BrugerOL.
Når en bruger logger ind, skriver han også sit navn ind i tabellen.

strSQL = "INSERT INTO BrugerOL ( brugernavn ) VALUES ('" & username & "',)"

og når han logger ud sletter han sit navn fra tabellen.

Hvis du forstår hvad jeg mener :-)  ??

...jeg vil gerne lave det til dig, men så skal jeg bruge den kode du bruger til at validere brugeren.

Her har du det MED global.asa:
http://activedeveloper.dk/aspdigital/kapitel1/countusers.asp

og her uden:
http://activedeveloper.dk/aspdigital/2001060701.asp

//>Rune

loukas jeg tror jeg vil bruge dit forslag men hvad nu hvis han ikke logger ud altså bare lukker vinduet hvad gør jeg så??

Oki :-)

Hvis det skal laves 'rigtigt' så mener jeg at du skal kigge på

http://activedeveloper.dk/aspdigital/2001060701.asp

at gemme de aktive brugere i en session variabel er det optimale.

Ja du kommer nok lidt på arbejde  ;-)

hvis du vil bruge det gamle,


hmmmm, kan der ikke laves en 'tvungen' logud ???

msgBox - vil du logge ud ???

ja - loog ud

nej - dsfasd