Nabídka portálu se při zobrazení článku přesouvá na konec pravého sloupce nabídek.
 Počítadlo aktualně připojených uživatelů |
Autor: Kočí Marek
| Zdroj:
| Vytvořeno: 9.9.2003
| Publikováno: 9.9.2003
| Čtenářů: 3089
| Unikátních: 3057
|
Jak se dá zobrazovat, kolik lidí si právě čte vaše stránky.
Do souboru global.asa vložte tento kód.
Ten provádí vlastní počítání připojených uživatelů.
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
Application("Online") = 0
End Sub
Sub Session_OnStart
Session.Timeout = 15
Application.Lock
Application("Online") = Application("Online") + 1
Application.Unlock
End Sub
Sub Session_OnEnd
Application.Lock
Application("Online") = Application("Online") - 1
Application.Unlock
End Sub
</SCRIPT>
Tam, kde chcete počítadlo zobrazit vložte následující kód do asp souboru.
<% Response.Write("Online prohlíží : " & _
Application("Online") & _
" uživatelů") %>
| 
Novinky e-mailem
Nejčtenější články
Anketa
Nabídka portálu