彻底终结浏览器Cahce页面的解决方案

发表于:2007-06-30来源:作者:点击数: 标签:
浏览器经常Cache你的页面,这是一个很麻烦的问题,下面先提出 六种方案来解决一般的问题:(把下面的代码加入到asp程序的最开始位置) % response.expires = 0 response.expiresabsolute = Now() - 1 response.addHeader pragma,no-cache response.addHeader
浏览器经常Cache你的页面,这是一个很麻烦的问题,下面先提出
六种方案来解决一般的问题:(把下面的代码加入到asp程序的最开始位置)
<%
response.expires = 0
response.expiresabsolute = Now() - 1
response.addHeader "pragma","no-cache"
response.addHeader "cache-control","private"
Response.CacheControl = "no-cache"(或则设置为Private)
%>
请注意分析上面的方法:
前4种方法可以一般的终结浏览器缓存页面。但是它们对IE5是无能为力的,
对于IE5只能够使用第5种方法。上面的方法都是针对IE浏览器的,它们告诉
IE浏览器关闭缓存页面功能。
但是十分不幸的是,即使如此,NetScape浏览器还是将缓存页面。
要最终不让浏览器缓存页面,在编程的时候就会付出很多。其实缓存页面
对于纯粹的HTML页面来说是很有用的,它可以减轻服务器的压力。但是它对于
动态的asp来说简直就是灾难,特别是如果你是开发一个电子商务程序时,例如
一个购物车程序,你会发现你订购的东西突然会莫名其妙的消失了,或者本来已经
被删除掉的货物怎么会突然出现在购物车内呀,所以,往往你会付出很大的代价
来解决缓存页面这个大麻烦:
1。尽量小心使用Response.redirect,不要到处乱用,呵呵。
2。可以使用下面的两个函数替代redirect.用一个带?号的url传递给函数
Redirect,这样每次生成的连接到下一页的url将不同,不同的url将会让所有的
浏览器终止缓存同一个页面的,呵呵,是个比较有意思的方法。这也是我推荐的
第六种方法。
Function Redirect( NewURL )
If Not IsEmpty( NewURL & "" ) Then
Dim QuestionMark
QuestionMark = Instr( NewURL, "?" )
If QuestionMark = 0 Then
Response.Redirect NewURL & "?" & NoCacheURL()
Response.End
Else
Response.Redirect NEWURL & "&" & NoCacheURL()
Response.End
End If
End If

Function NoCacheURL()
On Error Resume Next
Randomize
@# 一般是两种生成随机连接的方法,如果你使用Now()的话,就不用使用Randomize了
NoCacheURL = "NoCache=" & Server.URLEncode(rnd)
@# 或则NoCacheURL = "NoCache=" & Server.URLEncode(Now())
End Function

原文转自:http://www.ltesting.net