كيف اعمل

اخي جرب هذا الكود في ملف الGlobal.asax

Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)
Me.Application.Lock()
Me.Application("Visitors") = _
CInt(Me.Application("Visitors") + 1)
Me.Application.UnLock()
End Sub

ولإظهارالعدد في label مثلا , يكون الكود

label1.text=Application("Visitors")

اخي عبد المعز اشكرك راح اجرب وارد عليك

مزبوط يا معلم . ممكن تشرحلي كيف فكرتها لاني لسه جديد في هذه الامور . اذا وقتك يسمح . :)