Question

有关asp.net （vb） 页面记录访问量的小小问题，望各位高手指点 ……

一下是主页面加载时的左右代码，
Dim visitnumber As Long
Dim myfile As String = Server.MapPath("counter.txt")
Dim sw As StreamWriter
Dim sr As StreamReader
If Not IsPostBack Then
Session("user") = 1
End If
If Session("user") = 1 Then
If File.Exists(myfile) = False Then
' File.Create(Server.MapPath("counter.txt"))
sw = New StreamWriter(myfile, False, Encoding.Default)
sw.WriteLine("1")
sw.Close()
Label1.Text = "您是第一位访客！"
Else
sr = New StreamReader(myfile, Encoding.Default)
visitnumber = CLng(sr.ReadLine())
sr.Close()
sw = New StreamWriter(myfile, False, Encoding.Default)
visitnumber = visitnumber + 1
sw.WriteLine(visitnumber.ToString())
sw.Close()
Label1.Text = "您是第" & visitnumber & "位访客"
End If
End If
Session("user") += 1
Response.Write(Session("user"))

问题：session（"user"） 的值只改变了一次，一直为2 是怎么回事？
还有一个，我做了两个页面，超链接，用来在两个页面之间的切换，按道理说切换session("user")是一只存在的，不会执行代码中的第二个if语句 可是每次都执行里面的if 或else 语句 请问是怎么会事呢？ 谢谢过啦！ ^_^

Answer 1

你用 application("user") 记录访问的次数试下。
session("user")不是全局变量，就是说，一个客户机打开网站时，session("user")才被初始化，关闭浏览器后，相应的session("user")为空。
application("user") 在iis被启用时初始，iis 关闭时才结束。

你也可以在网页加载读取文件中的行，再加一就可以了。

Answer 2

If Not IsPostBack Then
Session("user") = 1
End If
从别的页切换到当前页,IsPostBack为false吧?

Answer 3

If Not IsPostBack Then
Session("user") = 1
End If
如果你是按页面里的按钮提交了页面，每次都走了这里，然后+1，不就是2了吗。

第二个问题，session（"user"）=2就走了里面的逻辑啊。