test.asp
<%
Function Sleep(n) '单位秒s
Dim StartTime
StartTime = Timer
Do : Loop Until Timer>n+StartTime
End Function
sleep(30)
response.write(session.sessionid)
%> test1.asp
<%
response.write(session.sessionid)
%>
如果用同一浏览器打开,则会再现此类现象,如果分别用不同的浏览器打开,则不存在