ASP ile Online Ziyaretçi Sayısı
admin
->
Bu kodun çalışabilmesi için global.asa dosyası ana Klasöre kopyalanmak zorundadır.
Sub Application_OnStart
Application("ZiyaretciSayisi") = 0
End SubSub Session_OnStart
Application.Lock
Application("ZiyaretciSayisi") = Application("ZiyaretciSayisi") + 1
Application.UnLock
End SubSub Session_OnEnd
Application.Lock
Application("ZiyaretciSayisi") = Application("ZiyaretciSayisi") - 1
Application.UnLock
End Sub
Yapılması gereken bir diğer işlem .asp sayfalarında EnableSessionState yönergesi false olarak yerleştirilmemelidir.
Katagori
ASP |







































































