最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
在ASP中模拟.NET下的cache技术
时间:2008-01-12 编辑:简简单单 来源:一聚教程网
声明:缓存管理类出自于动网论坛7.0
注意:最好不要在缓存里直接缓存带状态的对象和MTA模式的对象,比如说直接缓存记录集或者数据库链接对象等。
<%
Sub ShowRsArr(rsArr)
'用表格显示记录集getrows生成的数组的表结构
'
Response.Write "<table % border=0 cellspacing=0 cellpadding=0>"
If Not IsEmpty(rsArr) Then
For y=0 To Ubound(rsArr,2)
Response.Write"<tr>"
for x=0 to Ubound(rsArr,1)
Response.Write "<td>"&rsArr(x,y)&"</td>"
next
Response.Write"</tr>"
next
Else
Response.Write "<tr>"
Response.Write "<td colspan="&rs.fields.count-1&">No Records</td>"
Response.Write "</tr>"
End If
Response.Write "</table>"
End Sub
Class Cls_Cache
Rem ==================使用说明=================================================================================
Rem = 本类模块是动网先锋原创,作者:迷城浪子。如采用本类模块,请不要去掉这个说明。这段注释不会影响执行的速度。=
Rem = 作用:缓存和缓存管理类 =
Rem = 公有变量:Reloadtime 过期时间(单位为分钟)缺省值为14400, =
Rem = MaxCount 缓存对象的最大值,超过则自动删除使用次数少的对象。缺省值为300 =
Rem = CacheName 缓存组的总名称,缺省值为"Dvbbs",如果一个站点中有超过一个缓存组,则需要外部改变这个值。
=
Rem = 属性:Name 定义缓存对象名称,只写属性。
=
Rem = 属性:value 读取和写入缓存数据。
=
Rem = 函数:ObjIsEmpty()判断当前缓存是否过期。
=
Rem = 方法:DelCahe(MyCaheName)手工删除一个缓存对象,参数是缓存对象的名称。
=
Rem ===========================================================================================================
Public Reloadtime,MaxCount,CacheName
-
上一个: Request和Response对象
-
下一个: 几种打开记录集方式的比较
相关文章
- ASP .NET TextBox 控件 11-04
- 蛙蛙推荐:asp中模拟.net中的cache 01-18
- VBS 批量Ping的项目讲解 09-19
- 如何封装一个Ajax函数介绍 09-16
- ASP实现加法验证码方法 09-16
- ASP错误捕获的几种常规处理方法介绍 09-16