حساب عدد المتواجدين في الموقع باسهل طريقة باستخدام Label بلغة V.B

حساب عدد المتواجدين في الموقع باسهل طريقة باستخدام  Label

في حدث البيج لود  page load
نكتب الكود التالي
حيث lbonline هو id الخاص باليبل التي تضهر لنا عدد الزوار

  Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim intNumber As Integer

        ("intNumber = Application("ActiveUsers

        lbonline.Text = (intNumber)

    End Sub