STEP 1
Add below lines in Global.asax File
Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)
Application.Add("UserCount", 0)End Sub
Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)
Dim UserCount As IntegerEnd Sub
UserCount = Convert.ToInt32(Application.Get("UserCount").ToString())
UserCount = UserCount + 1
Application.Set("UserCount", UserCount)
Sub Session_End(ByVal sender As Object, ByVal e As EventArgs)
Dim UserCount As IntegerEnd Sub
UserCount = Convert.ToInt32(Application.Get("UserCount").ToString())
UserCount = UserCount - 1
Application.Set("UserCount", UserCount)
Step: 2
Add a Web.Config File
< sessionState mode="InProc"/ >
Step: 3
Code Behind
TextBox1.Text = Application.Get("UserCount").ToString()
No comments:
Post a Comment