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

ttx9n · 发表于 2006-11-16 00:00:00

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

Function NoCacheURL()

On Error Resume Next

Randomize

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

End Function

leidie123a · 发表于 2022-8-19 23:22:44

大家都不容易！

fenghaoke · 发表于 2023-2-15 17:20:19

很好，谢谢分享

ki9ku6 · 发表于 2023-6-22 10:54:12

撒房产税陈飞飞

a971560 · 发表于 2023-6-29 12:35:25

这个源码不错啊

7jbiiz · 发表于 2023-7-30 05:45:24

为全额万千瓦

pwseqn1h · 发表于 2023-8-11 16:44:22

女生看了弄丢了卡萨诺的卡洛斯

64000928 · 发表于 2023-8-15 13:20:13

哟哟哟哟哟以偶

81708585 · 发表于 2023-10-21 00:39:11

先把创新班才能下班才能下班

ki9ku6 · 发表于 2023-11-7 08:42:04

下载来瞧瞧

账号		自动登录	找回密码
密码			立即注册

[编程10000问] 如何终止浏览器的Cahce页面？