asp清空站点缓存
来源：asp之家 时间：2009-08-04 18:01:00
清空服务器缓存asp代码：
<％
Call RemoveAllCache()
Sub RemoveAllCache()
Dim cachelist,i
Call InnerHtml("UpdateInfo","<b>开始执行清理当前站点缓存</b>：")
Cachelist=split(GetallCache(),",")
If UBound(cachelist)>1 Then
For i=0 to UBound(cachelist)-1
DelCahe Cachelist(i)
Call InnerHtml("UpdateInfo","更新 <b>"&cachelist(i)&"</b> 完成")
Next
Call InnerHtml("UpdateInfo","更新了"& UBound(cachelist)-1 &"个缓存对象<br>")
Else
Call InnerHtml("UpdateInfo","<b>当前站点全部缓存清理完成。</b>。")
End If
End Sub
Function GetallCache()
Dim Cacheobj
For Each Cacheobj in Application.Contents
GetallCache = GetallCache & Cacheobj & ","
Next
End Function
Sub DelCahe(MyCaheName)
Application.Lock
Application.Contents.Remove(MyCaheName)
Application.unLock
End Sub
Sub InnerHtml(obj,msg)
Response.Write "<li>"&msg&"</li>"
Response.Flush
End Sub
％>
asp禁止页面缓存方法：
1、在Asp页面首部加入
Response.Buffer = True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "No-Cache"
或者将此代码写到一个包含文件包含到ASP文件里
2、在HtML代码中加入
<HEAD>
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
<META HTTP-EQUIV="Cache-Control" CONTENT="no-cache">
<META HTTP-EQUIV="Expires" CONTENT="0">
<HEAD>
0
投稿猜你喜欢
Oracle9iPL/SQL编程的经验小结
如何快速地更新网页内容？
关于JS中的事件--Event对象
这些CSS Selector，你都熟悉吗？
JavaScript缓动库
制定设计的原则
如何取得MYSQL中ENUM列的全部可能值
得到元素真实的背景颜色的函数
在ASP中通过oo4o连接Oracle数据库的例子
asp如何检测HTTP表头信息？
asp如何对多个条件进行判断？
jQuery打造动态下滑菜单
[翻译]标记语言和样式手册 Chapter 7 锚点
Oracle学习笔记(五)
javascript对象概念大全
SQL查询重复记录
SEM之医疗网站跳出率 逼迫访客跳出网站的六宗罪
