aspactiveusers

Posted on 12 Februari 2009 di LEU oleh admin

Potongan kode ini menunjukkan bagaimana untuk menunjukkan bagaimana
pengguna aktif banyak terdapat di situs, ini sangat
banyak digunakan di internet.

menggunakan editor teks favorit Anda membuat
file global.asa dan masukkan kode di bawah ini

<script LANGUAGE=VBScript RUNAT = Server>

Sub Application_OnStart

Aplikasi ( "kunjungan") = 0
Aplikasi ( "aktif") = 0
End Sub

Sub Application_OnEnd
Sub Session_OnStart

'Mengatur waktu hingga 20 menit
Session.Timeout = 20
Session ( "Start") = Sekarang
'Meningkatkan hitungan oleh 1
Application.lock
Aplikasi ( "kunjungan") = Application ( "kunjungan") + 1
intTotal_visitors = Application ( "kunjungan")
Application.unlock
Session ( "VisitorID") = intTotal_visitors
Application.lock
Aplikasi ( "aktif") = Application ( "aktif") + 1
Application.unlock

End Sub

Session_OnEnd
'Penurunan oleh 1 ketika sesi berakhir
Application.lock
Aplikasi ( "aktif") = Application ( "aktif") - 1
Application.unlock
End Sub
</ script>

Sekarang tambahkan ke halaman berikut untuk menghitung
Pengguna aktif

<b> <% = Session ( "VisitorID ")%></ b>
kunjungan (s)
<b> <% = Application ( "aktif ")%></ b>
pengunjung online

Posting terkait:

  1. User aktif dalam LEU kode ini menunjukkan bagaimana cara untuk menampilkan banyak aktif ...
  2. Lebih akurat teks counter ini adalah yang lebih akurat dari counter contoh kami sebelumnya ...

Terkait posting kepada Anda oleh Namun lain Related Posts Plugin.

Kirim komentar