Programmingsite tutorials

Ten fragment kodu pokazuje, w jaki sposób, aby pokazać, jak
wielu aktywnych użytkowników nie są na swoim miejscu, jest to dość
powszechnie stosowane w Internecie.

za pomocą swojego ulubionego edytora tekstu utworzyć
plik Global.asa i wpisz poniższy kod

<SCRIPT LANGUAGE=VBScript runat = Server

Sub Application_OnStart

Application ( "odwiedziny") = 0
Application ( "Active") = 0
End Sub

Sub Application_OnEnd
Sub Session_OnStart

"Ustawić limit czasu do 20 min
Session.Timeout = 20
Sesja ( "Start") = teraz
"Liczyć wzrost o 1
Application.lock
Application ( "odwiedziny") = Application ( "odwiedziny") + 1
intTotal_visitors = Application ( "odwiedziny")
Application.unlock
Sesja ( "VisitorID") = intTotal_visitors
Application.lock
Application ( "Active") = Application ( "Active") + 1
Application.unlock

End Sub

Session_OnEnd
"Spadek o 1 podczas sesji kończy
Application.lock
Application ( "Active") = Application ( "Active") - 1
Application.unlock
End Sub
</ script>

Teraz dodać następujące strony liczyć na
aktywnych użytkowników

<b> <% = Session ( "VisitorID ")%></ b>
wizyty (s)
<b> <% = Application ( "Active ")%></ b>
odwiedzających online

Bookmark It

Ukryj Witryny

Podobne posty:

1. Aktywni użytkownicy w ASP Ten fragment kodu pokazuje, w jaki sposób by pokazać jak wiele aktywnych ...
2. Dokładniejsze tekst licznik ten jest bardziej dokładne niż licznik naszym poprzednim przykładzie ...

Podobne posty przyniósł ci przez Yet Another Related Posts Plugin.