蛙蛙推荐:巧用缓存提高asp程序的性能

原创 2004年07月07日 08:26:00

<!-- 蛙蛙推荐:巧用缓存提高asp程序的性能 -->
<!--为了提高Asp程序的性能,人们常常将经常使用的数据缓存在 Application,
但是你修改了数据库后怎么让application更新呢,本文给你提供了一个合理的解决办法,
如果谁有更好的算法,请跟帖讨论一下,谢谢
-->
<%
Class wawa_app_getrows
public Function wawa_Get_List(strapp,strconn,strsql)
'********************************
'功能:从Application中提取数组,如果application中的数据为empty值的时候再调用wawa_Get_Rows()函数来给application赋值.
'  ,你可以在修改数据库的时候把相应的application值清空成empty,这就浏览的时候就会自动更新application了
'  如果你更新了数据库(比如说添加,修改或者删除了数据)那么在修改数据库后把相应的application变量去掉,
'  用下面的一条语句来实现清空指定的application值,其中strapp参数是要去掉的application变量名
'  application.Contents.Remove(strapp)
'********************************
Dim wawa
wawa = Application(strapp)
If isempty(wawa) Then
wawa = wawa_Get_Rows(strconn,strsql)
Application(strapp) = wawa
End If
wawa_Get_List = wawa
End Function

public Function wawa_Get_Rows(strconn,strsql)
'********************************
'功能:从数据库里读取记录并用getrows方法
' 把记录保存成一个数组
'
'********************************
Dim rs_wawa
Set rs_wawa = CreateObject("ADODB.Recordset")
rs_wawa.Open strsql,strconn,,1,1
wawa_Get_Rows = rs_wawa.GetRows()
rs_wawa.Close
Set rs_wawa = Nothing
End Function
End Class
%>
<!-- 下面举个例子来说明上面的那个类怎么使用 -->
<%
dim strapp,strsql,strconn
strapp="employee"
strsql="SELECT EmployeeID,TitleOfCourtesy,FirstName,LastName,Title,City FROM Employees"
strconn="Driver={sql server};server=192.168.0.110;database=northwind;uid=sa;pwd=sa;"
set wawa_temp=new wawa_app_getrows
arr_wawa=wawa_temp.wawa_Get_LIst(strapp,strconn,strsql)
%>

<%
 Response.Write("<table width='100%' border='0' cellspacing='1'>")
 Dim i,j,Rows,Flds
 Rows=Ubound(arr_wawa,2)
 Flds=Ubound(arr_wawa,1)
 If Rows>=0 Then
 For i=0 To Rows
  Response.Write("<tr>")
  For j=0 to Flds
   Response.Write"<td>"&arr_wawa(j,i)&"</td>"
  Next
  Response.Write("</tr>")
 Next
 Else
 Response.Write("<tr><td>"&Rows&"</td></tr>")
 End If
 Response.Write("</table>")
%>

这款养蛙游戏火爆了朋友圈,游戏开发程序员已赚翻!

最近我的朋友圈发生了变化不晒猫、不晒狗、不晒老公他们都在晒蛙?!“我家蛙蛙出去浪到现在都还没有回来,明信片也没寄……”“呀,我不小心把我家蛙的明信片删了怎么办怎么办??”“上个礼拜首页还都是四个男人,...
  • EGEFCXzo3Ha1x4
  • EGEFCXzo3Ha1x4
  • 2018年01月24日 00:00
  • 327

蛙蛙推荐:asp提高首页性能的一个技巧

蛙蛙推荐:asp提高首页性能的一个技巧简单介绍:一般一个网站的首页访问量是最大的,如果您的网站的首页打开的非常缓慢,您的客户将会陆续离开你的网站.通常我们把需要经过复杂运算或者查询数据库得出的数据缓存...
  • onlytiancai
  • onlytiancai
  • 2005年03月25日 14:14
  • 1280

管理寓言:蛙鼠殒命

蛙鼠殒命                                           一只老鼠在河边玩耍的时候,遇见了英俊的青蛙。青蛙口若悬河地向老鼠介绍游泳的快乐、漂流的趣味以及沼泽地...
  • citizen2yy
  • citizen2yy
  • 2004年11月09日 17:50
  • 1650

蛙蛙连连看新版道具整蛊刺激

  向来爱玩连连看的我立马下载了最新版的来试试身手,没想到一下就爱不释手了!  道具首先最大的改变是即得即用了。也就是,消掉了带道具的图标之后,道具就自动释放,自动作用于对方。现在图标中所隐藏的道具都...
  • Labber
  • Labber
  • 2008年03月14日 01:37
  • 353

蛙蛙推荐:蛙蛙教你文本聚类

蛙蛙推荐:蛙蛙教你文本聚类摘要:文本聚类是搜索引擎和语义web的基本技术,这次本蛙和大家一起学习一下简单的文本聚类算法,可能不能直接用于实际应用中,但对于想学搜索技术的初学者还是有一定入门作用的。这...
  • onlytiancai
  • onlytiancai
  • 2008年05月10日 20:40
  • 730

蛙蛙推荐:刚刚写了一个考试程序,给大家贴一下,我没写过多注释哦

function wawa_savehtml(f,s)作者:天极.蛙蛙王子功能:在服务器端保存数据 dim fs,ts,dir,files,path Set fs = CreateObject("Sc...
  • onlytiancai
  • onlytiancai
  • 2004年09月07日 10:38
  • 1330

蛙蛙推荐:蛙蛙浏览器

蛙蛙推荐:蛙蛙浏览器摘要:google推出了自己的网页浏览器,现在web浏览器的竞争更激烈了,各有各的用户群。其实有另一个领域没有多少竞争,那就是应用程序浏览器,今天给大家演示的蛙蛙浏览器,不仅可以...
  • onlytiancai
  • onlytiancai
  • 2008年09月15日 09:38
  • 402

蛙蛙推荐:蛙蛙教你索引邮件

蛙蛙推荐:蛙蛙教你索引邮件困了,不多说了,就是教你怎样把邮件建立索引,再搜索出来。用MAPI把邮件读取到数据库里,用SharpICTCLAS做一个lucene的中文的语汇单元分析器,用lucene建...
  • onlytiancai
  • onlytiancai
  • 2008年05月21日 00:40
  • 420

全国首个OMO模式——美特好旗下全球蛙新零售

转载请注明出自CSDN——全球最大中文IT社区 一、OMO模式是什么? 中文名:OMO商业模式;外文:Online-Merge-Offline;含义:行业平台型商业模式;作用:最终实现品牌...
  • weixin_41609669
  • weixin_41609669
  • 2018年01月17日 14:23
  • 286

蛙蛙推荐:蛙蛙牌firefox插件

上次给大家演示了抓取IE内核浏览器的网页,这次和大家一起写一个抓取firefox页面文本的例子。Firefox有自身的一套结构良好的插件机制,但要深入开发Firefox插件的话要了解javascri...
  • onlytiancai
  • onlytiancai
  • 2008年11月12日 00:37
  • 898
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:蛙蛙推荐:巧用缓存提高asp程序的性能
举报原因:
原因补充:

(最多只允许输入30个字)