好得很程序员自学网

<tfoot draggable='sEl'></tfoot>

如何终止浏览器的Cahce页面?_编程10000问_

NEWSZW_HZH_BEGIN-->

如何终止浏览器的 Cahce 页面?

 

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

NoCacheURL = "NoCache=" & Server.URLEncode(rnd)

 

End Function

NEWSZW_HZH_END-->

查看更多关于如何终止浏览器的Cahce页面?_编程10000问_的详细内容...

  阅读:51次