Avatar billede flemminghave Nybegynder
02. juni 2003 - 20:10 Der er 5 kommentarer og
1 løsning

Loop session

Kan man loope brugere uden brug af global.asa??

Det der skal loopes er:

Response.Write vbCrLf & ("<a href=java script:openWin('profil.asp?BrugerID=" & session("BrugerID") & "','profile','toolbar=0,location=0,status=0,menubar=0,scrollbars=1,resizable=0,width=500,height=500') class='smlink'>" & session("Brugernavn") & "</a>")
Avatar billede -master-d- Nybegynder
02. juni 2003 - 20:25 #1
Jeg må indrømme at jeg ikke helt er med på hvad du mener..
Avatar billede flemminghave Nybegynder
02. juni 2003 - 20:27 #2
Jeg skal loope de medlemmer som har logget ind så man kan se hvem der er online..
Når de logger ind bliver session("Brugernavn") aktiv og det er det jeg vil have loppet..
Er det mere forståeligt?? :)
Avatar billede netro Nybegynder
02. juni 2003 - 20:32 #3
Du kan løbe dine sessions i gennem uden at kende navnene således:

For Each Bruger In Session.Contents
    Response.Write Bruger & "<br>"
Next
Avatar billede flemminghave Nybegynder
02. juni 2003 - 20:36 #4
Ok jeg dukkede op 5 gange da jeg loggede ind..;)
Det her er hvad jeg skrev..:

For Each Brugernavn In Session.Contents
Response.Write vbCrLf & ("<a href=java script:openWin('profil.asp?BrugerID=" & session("BrugerID") & "','profile','toolbar=0,location=0,status=0,menubar=0,scrollbars=1,resizable=0,width=500,height=500') class='smlink'>" & session("Brugernavn") & "</a>")
Next
Avatar billede netro Nybegynder
02. juni 2003 - 20:49 #5
Du kan ikke udskrive sessioner, der ikke er dine egne.
Avatar billede netro Nybegynder
02. juni 2003 - 20:58 #6
Så skal du i stedet benytte en applikationsvariabel.

Bruger logger ind:

Bruger = "Peter"
Session("Brugernavn") = Bruger
Application("online") = Application("online") & "," & Bruger & ","

Bruger logger af:

Application("online") = Replace(Application("online"), "," & Bruger & ",", "")

Udskriv onlineliste:

Arr_Online = Split(Replace(Application("online"), ",,", ","), ",")
For i = 1 To UBound(Arr_Online) - 1
  Response.Write Arr_Online(i) & "<br>"
Next
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester