ispostback怎么不管用

sub Page_Load(q as object,w as eventargs)
dim i as integer
dim e as New StreamReader(server.MapPath("he.txt"))
i=e.readline()
e.close()
if not IsPostBack
i=i+1
Dim p As New StreamWriter(Server.MapPath("he.txt"))
p.writeline(i)
p.close()
end if
这是一个简单的网页计数函数，本来想实现当用户第一次打开网页时i才加一，网页刷新时不加一，所以用上了ispostback，但是怎么不管用，网页刷新时i还是加一，这是怎么回事？怎么解决？ --------------------编程问答-------------------- 网页计数，用application --------------------编程问答-------------------- 防刷新，可用 Session --------------------编程问答-------------------- IsPostBack是提交。
刷新属于从新载入该页面，所以刷新还是被认为是Not IsPostBack。
防刷新可以用Session --------------------编程问答-------------------- IsPostBack用来判断是否是因为提交而刷新的页面.
根据客户端IP，判断
--------------------编程问答-------------------- 顶楼上的,那应该再设置一个时间段间隔吧???  这样才可以在一定时间内同一IP浏览次数不重复增加,是吧???

补充：.NET技术 ,  ASP.NET