xml缓存类
日期：2010-02-26 浏览次数：20972 次
特点：
读取机制：自动判断有无缓存了的xml文件，当xml文件存在数据，侧从xml获取数据，反之从数据库读取；
缓存机制：根据xml文件生存时间和用户自定义的缓存时间判断缓存有无过期，过期侧生存新的xml文件；
有效减少数据库查询读取次数，缓存数据量小读取更快
修改了一下，加了两个方法，使用更方便
以下是引用片段：
代码:
<%
Rem xml缓存类
’--------------------------------------------------------------------
’转载的时候请保留版权信息
’作者:╰⑥月の雨╮
’博客: http://chthp.cnblogs.com/
’版本:ver1.0
’本类部分借鉴 walkmanxml数据缓存类，使用更为方便 欢迎各位交流进步
’--------------------------------------------------------------------
Class XmlCacheCls
Private m_DataConn ’数据源,必须已经打开
Private m_CacheTime ’缓存时间，单位秒 默认10分钟
Private m_XmlFile ’xml路径，用绝对地址,不需要加扩展名
Private m_Sql ’SQL语句
Private m_SQLArr ’(只读)返回的数据数组
Private m_ReadOn ’(只读)返回读取方式 1-数据库 2-xml 检测用
’类的属性=========================================
’数据源
Public Property Set Conn(v)
Set m_DataConn = v
End Property
Public Property Get Conn
Conn = m_DataConn
End Property
’缓存时间
Public Property Let CacheTime(v)
m_CacheTime = v
End Property
Public Property Get CacheTime
CacheTime = m_CacheTime
End Property
’xml路径，用绝对地址
Public Property Let XmlFile(v)
m_XmlFile = v
End Property
Public Property Get XmlFile
XmlFile = m_XmlFile
End Property
’Sql语句
Public Property Let Sql(v)
m_Sql = v
End Property
Public Property Get Sql
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
