Avatar billede exe-s Nybegynder
19. marts 2001 - 15:20 Der er 8 kommentarer og
2 løsninger

global.asa

Jeg ved næsten ikke noget om ASP så håber her er en som vil hjælpe mig... jeg ved at jeg skal bruge en global.asa fil og hvad skal der stå i sådan en fil eller er der nogen som har en til mig?? og gider i ikke godt lige forklare hvad global.asa filen egentlig bruges til.


det er dette script som skal komme til at virke... (tæller hvor mange online som er på siden.)

<script language=VBScript runat=Server>
Sub Application_OnStart
Application(\"WhoOn\") = 0
End Sub

Sub Application_OnEnd

End Sub

Sub Session_OnStart
Session.Timeout = 20

Application.Lock
Application(\"WhoOn\") = Application(\"WhoOn\") + 1
Application.Unlock
End Sub

Sub Session_OnEnd
Application.Lock
Application(\"WhoOn\") = Application(\"WhoOn\") - 1
Application.Unlock
End Sub
</script>


<%=application(\"Whoon\")%>


please hjælp mig...
Avatar billede a-torsten Nybegynder
19. marts 2001 - 15:24 #1
----- Global.asa -----
<script language=VBScript runat=Server>
Sub Application_OnStart
Application(\"WhoOn\") = 0
End Sub

Sub Application_OnEnd

End Sub

Sub Session_OnStart
Session.Timeout = 20

Application.Lock
Application(\"WhoOn\") = Application(\"WhoOn\") + 1
Application.Unlock
End Sub

Sub Session_OnEnd
Application.Lock
Application(\"WhoOn\") = Application(\"WhoOn\") - 1
Application.Unlock
End Sub
</script>
--------------------------------


------ Den fil hvor det skal stå på ----

<%=application(\"Whoon\")%>

-----------------------------------------


Den virker fint hos mig..
Avatar billede bjarke-b Nybegynder
19. marts 2001 - 15:24 #2
Du gemmer dette i en fil du kalder global.asa:

<script language=VBScript runat=Server>
Sub Application_OnStart
Application(\"WhoOn\") = 0
End Sub

Sub Application_OnEnd

End Sub

Sub Session_OnStart
Session.Timeout = 20

Application.Lock
Application(\"WhoOn\") = Application(\"WhoOn\") + 1
Application.Unlock
End Sub

Sub Session_OnEnd
Application.Lock
Application(\"WhoOn\") = Application(\"WhoOn\") - 1
Application.Unlock
End Sub
</script>



Du kan så sætte <%=application(\"Whoon\")%> ind på en hvilken som helst *.asp side
Avatar billede netsrac Praktikant
19. marts 2001 - 15:24 #3
Avatar billede bjarke-b Nybegynder
19. marts 2001 - 15:26 #4
Avatar billede annikadk Nybegynder
19. marts 2001 - 15:28 #5
Det kan ske at serveren skal genstartes før det vil virke...
Avatar billede exe-s Nybegynder
19. marts 2001 - 15:35 #6
det virker ikke. vil i sige hvad der er forkerti dette?? http://www.exe-s.dk/online.zip
Avatar billede mouzey Nybegynder
19. marts 2001 - 15:49 #7
http://www.exe-s.dk/online.asp virker fint hos mig?
Avatar billede exe-s Nybegynder
19. marts 2001 - 15:54 #8
jeg tog scriptet fra http://www.eksperten.dk/spm/32416.
og den tæller heller ikke hvor mange der er online men hvor mange som har besøgt siden.
Avatar billede a-torsten Nybegynder
19. marts 2001 - 15:58 #9
global.asa

<SCRIPT LANGUAGE=\"VBScript\" RUNAT=\"Server\">
Sub Application_OnStart
  \' Nulstiller antallet af brugere når applikationen (serveren) startes
  Application(\"ActiveUsers\") = 0
End Sub
Sub Application_OnEnd
  \' Skriv kode som skal køres når applikationen (serveren) stoppes
End Sub

Sub Session_OnStart
  \' Forøger antallet af brugere med 1, når en session startes
  Application.Lock
    Application(\"ActiveUsers\") = Application(\"ActiveUsers\") + 1
  Application.UnLock
End Sub

Sub Session_OnEnd
  \' Reducer antallet af brugere med 1, når en session afsluttes
  Application.Lock
    Application(\"ActiveUsers\") = Application(\"ActiveUsers\") - 1
  Application.UnLock
End Sub
</SCRIPT>

<%=Application(\"ActiveUsers\")%>  ind der hvor du ønsker at antallet skal stå ....
Avatar billede exe-s Nybegynder
19. marts 2001 - 16:24 #10
jeg fik altså ikke lige svar på det jeg ville men jeg fik løst et andet problem så mange tak.
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

IT-JOB

JP/Politikens Hus

Netværkstekniker

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Cyberdivisionen søger elementleder til Metode og Modning

Capgemini Danmark A/S

AI/Data Engineer

BEC Financial Technologies

Development Manager for Core Banking