当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP中利用application实现缓存

ASP
ASP 3.0高级编程(二十七)
ASP 3.0高级编程(二十八)
ASP 3.0高级编程(二十九)
ASP 3.0高级编程(三十)
ASP中时间函数的使用(一)
ASP中时间函数的使用(二)
ASP中时间函数的使用(三)
.NET之ASP WebApplication快速入门(1)
.NET之ASP WebApplication快速入门(2)
.NET之ASP WebApplication快速入门(3)
.NET之ASP WebApplication快速入门(4)
.NET之ASP WebApplication快速入门(5)
asp.NET特写
ASP 3.0高级编程(七)
ASP 3.0高级编程(八)
ASP.NET 入门的五个步骤
ASP 组件指南
XML 数据的编码方式
ASP 3.0高级编程(九)
ASP 3.0高级编程(十)

ASP中利用application实现缓存


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 145 ::
收藏到网摘: n/a

编者前言:

在web程序中实现缓存的方法有很多办法,例如用文件缓存,把某些数据临时的放入文件中;或者在数据库中缓存需要大量读取的数值;另外的较常见的方法就是利用全局变量进行缓存。在asp中利用application实现数据的缓存是很常见的,可以把某些共有的数据从数据库中独立出来,从而减少服务器的压力。缓存会占用一定的内存,所以不可用application存储很大的数据。

/>

我认为在ASP中最好的办法是用编程实现定时刷新Cache,也就是说给Application中储存的设一个过期时间。当然,在ASP中Application对象没有这样一个ExpireTime属性。这需要用程序实现。

  

以下为引用的内容:
         Code
  ASP:default.asp

 


  <%@Language=VBScript%>
  <%Option Explicit%>
  <%Response.Buffer=True%>
  <!--#include file = "conn.asp"-->
  <!--#include file = "GetCache.asp"-->
  <HTML>
  <HEAD>
  <TITLE>ASP Cache演示</TITLE>
  <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
  </HEAD>
  <BODY>
  <h4>每隔10秒刷新Cache:</h4>
  <%
  response.Flush
  GetHTMLStream
  response.Write
  HTMLStream
  %>
  </body>
  </html>

ASP:getcache.asp   

以下为引用的内容:
<%
  Const CACHE_DEFAULT_INTERVAL = 30 &apos;每隔30秒刷新一次cache
  Dim HTMLStream
  Dim IsExpires
  IsExpires = CacheExpires
  Function CacheExpires
  Dim strLastUpdate
  Dim result strLastUpdate = Application("LastUpdate")
  If (strLastUpdate = "") Or (CACHE_DEFAULT_INTERVAL < DateDiff("s", strLastUpdate, Now)) Then
  result = true
  SetLastUpdateTime
  Else
  result = false
  End If
  CacheExpires = result
  End Function
     %>

上面是一个最简单的例子。