我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地:首页 > 网络学院 > 网络编程 > ASP专区 > Asp技巧/优化 > asp性能测试第二部分(转)(三)
热门文章排行
热门文章排行 手推车”功能的实现(10-07)
八大法则防范ASP网站漏洞(10-23)
ASP教程十一、调试ASP脚本(10-23)
在JSP中访问数据库大全(10-23)
虚机服务中常见Asp.Net低级错误一览(03-21)
精采文章排行
精采文章排行 ASP.NET实现抓取网页中的链接(11-15)
ASP连接数据库的11种方法(11-10)
如何动态创建网页的RSS内容摘要(11-10)
ASP网站漏洞及入侵防范方法(11-10)
ASP自定义函数:对字符串正则替换(11-10)
技术专题推荐
网管论坛交流
 

asp性能测试第二部分(转)(三) 

作者:佚名   来源:本站教程   点击:   日期:2007-03-22

三、第一次测试

   在第一次测试中,我们模拟Microsoft ASP ADO示例中可找到的典型情形提取一个记录集。在这个例子(ADO__01.asp)中,我们首先打开一个连接,然后创建记录集对象。当然,这里的脚本按照本文第一部分所总结的编码规则作了优化。
< % Option Explicit % >
< !-- #Include file="ADOVBS.INC" -- >
< %
Dim objConn
Dim objRS

Response.Write( _
   "< HTML >< HEAD >" & _
   "< TITLE >ADO Test< /TITLE >" & _
   "< /HEAD >< BODY >" _
)

Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open Application("Conn")

Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.ActiveConnection = objConn
objRS.CursorType = adOpenForwardOnly
objRS.LockType = adLockReadOnly
objRS.Open Application("SQL")

If objRS.EOF Then
   Response.Write("No Records Found")
Else
   'write headings
   Response.Write( _
      "< TABLE BORDER=1 >" & _
      "< TR >" & _
      "< TH >OrderID< /TH >" & _
      "< TH >CustomerID< /TH >" & _
      "< TH >EmployeeID< /TH >" & _
      "< TH >OrderDate< /TH >" & _
      "< TH >RequiredDate< /TH >" & _
      "< TH >ShippedDate< /TH >" & _
      "< TH >Freight< /TH >" & _
      "< /TR >" _
   )
   'write data
   Do While Not objRS.EOF
      Response.Write( _
         "< TR >" & _
         "< TD >" & objRS("OrderID") & "< /TD >" & _
         "< TD >" & objRS("CustomerID") & "< /TD >" & _
         "< TD >" & objRS("EmployeeID") & "< /TD >" & _
         "< TD >" & objRS("OrderDate") & "< /TD >" & _
         "< TD >" & objRS("RequiredDate") & "< /TD >" & _
         "< TD >" & objRS("ShippedDate") & "< /TD >" & _
         "< TD >" & objRS("Freight") & "< /TD >" & _
         "< /TR > " _
      )
      objRS.MoveNext
   Loop
   Response.Write("< /TABLE >")
End If

objRS.Close
objConn.Close
Set objRS = Nothing
Set objConn = Nothing

Response.Write("< /BODY >< /HTML >")
% >




   下面是测试结果:

    



              

   我们来看一下各栏数字的含义: 0 返回0个记录的页面所需要的TTLB(毫秒)。在所有的测试中,该值被视为生成页面本身(包括创建对象)的时间开销,不包含循环访问记录集数据的时间。
25 以毫秒计的提取和显示25个记录的TTLB。
tot time/25 "25"栏的TTLB除以25,它是每个记录的总计平均时间开销。
disp time/25 "25"栏的TTLB减去"0"栏的TTLB,然后除以25。该值反映了在循环记录集时显示单个记录所需时间。
250 提取和显示250个记录的TTLB。
tot time/250 "250"栏的TTLB除以25,该值代表单个记录的总计平均时间开销。
disp time/250 "250"栏的TTLB减去"0"栏的TTLB,再除以250。该值反映了在循环记录集时显示单个记录所需时间。


   上面的测试结果将用来同下一个测试结果比较。



文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论

   相关文章:
·ASP中巧用Response属性 ·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式 ·连接数据库查询手册(不仅仅适用于asp)
·警惕"给你的FileSystemObject对象加把锁" ·用ASP做全文检索

   文章评论:(条)
  
 请留名: 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明:刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。