11. august 2002 - 22:18Der er
17 kommentarer og 1 løsning
Søger et NEMT Useronline script i asp.
Hej Eksperter. Jeg søger et rigtigt NEMT useronline script i asp. Databasen skal enten være .txt eller access. (Man kan da heller ik bruge andre vel?) - Tak.
Jamen SKAL global.asa ligge i den FØRSTE mappe af mit webhotel, selvom at <% Response.Write Application("BrugereOnline") %> står i et dokument som ligger i 2 undermapper?
Nu har jeg lagt global.asa i spidsen af min side, og indsat Write koden i mit asp dokument.. Men når jeg så går ind på siden, så står der 1. Hvis jeg så lukker siden og går derind igen så står der 2. Hvis jeg så lukker siden og går derind igen så står der 3, OSV.. Hvad er det nu for noget?
du kan ændre det ved at skrive session.timeout = xx herved sætter du en ny session timeout, jeg er ikke sikker men jeg mener at det er sec man angiver i
hvis du øverst i din asp side skriver: Session.Timeout = 10 så ændre du webserverens session timeout fra standard værdien til 10 min. hvis der så ikke har været en request fra klienten i mere end 10 min så lukker webserveren ned for den session som er oprettet til den
Øhhh?.. Skal jeg sætte det der ind i min global.asa dokument? Hvis ja, hvor skal det så være? : <script language="VBScript" runat="server"> Sub Application_OnStart Application("BrugereOnline") = 0 End Sub Sub Session_OnStart Application("BrugereOnline") = Application("BrugereOnline") + 1 End Sub Sub Session_OnEnd Application("BrugereOnline") = Application("BrugereOnline") - 1 End Sub </script>
Hvis du ændre session timeout, kan det have konsikvens, hvis du fx har en brugerfunktion, som er tilknyttet en session. Men som soes rigtigt siger, er det fordi den endnu ikke har timet ud, og derfor står det ene session der i 20 min, inden det bliver trukket fra.
Sådan her global.asa filen også se ud:
<SCRIPT LANGUAGE="VBScript" RUNAT="Server"> Sub Application_OnStart Application("OnlineUsers") = 0 End Sub Sub Application_OnEnd End Sub
Sub Session_OnStart Application.Lock Application("OnlineUsers") = Application("OnlineUsers") + 1 Session.Timeout = 20 'Her retter du til det antal minutter der skal gå inden session bliver lukket. Application.UnLock End Sub
Sub Session_OnEnd Application.Lock Application("OnlineUsers") = Application("OnlineUsers") - 1 Application.UnLock End Sub </SCRIPT>
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.