ASP缓存功能问题

<%
Dim Content
Content = Application("blueidea")
If IsEmpty(SenFe_Code) Then
    Response.Write "从Application中读取：<br />" & VbCrLf
Else
    Response.Write "从数据库或其它地方读取：<br />" & VbCrLf
    Content = "内容"
    Application.Lock
    Application("blueidea") = Content
    Application.UnLock
End If
Response.Write Content
%>
上面是一个很简单的例子，当然你直接运行可能测试不出速度有多明显，把
Content = "内容"
改成从其它地方读取的数据，而且需要时间相对有点长的那种，运行起来速度效果非常明显。当然你还可以加入时间等用以判断是否过期。

文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: