ASP实现缓存类无错版
yCache.value ''读取缓存内容
else
content="sosuo8.com测试" ''大量内容，可以是非常耗时大量数据库查询记录集
myCache.add content,dateadd("n",1000,now) ''将内容赋值给缓存，并设置缓存有效期是当前时间＋1000分钟
end if
Response.Write(content)
''myCache.makeEmpty()
set clsCache=nothing ''释放对象
%>
else
content="sosuo8.com测试" ''大量内容，可以是非常耗时大量数据库查询记录集
myCache.add content,dateadd("n",1000,now) ''将内容赋值给缓存，并设置缓存有效期是当前时间＋1000分钟
end if
Response.Write(content)
''myCache.makeEmpty()
set clsCache=nothing ''释放对象
%>