| 在第一部分,我们讨论了如何优化 ASP 代码。在这一部分,我们把重点放在数据访问上。 一般情况下,数据访问时间要比 ASP 代码解释,编译时间长,不要让数据检索成为影响 ASP 性能的瓶颈。 首先,讲一些老生常谈的话。比如:需要声明变量,要用 Response.Write SQL_string 来进行调试,要用 On Error Resume Next 来捕获错误。不要在 Application 和 Session 中存储 Connection 对象等等,都是一些很多人知道而又不屑一顾的常 识。 提高数据访问速度包含两方面内容:1 与数据库建立连接。2 检索数据。 建立高效的连接是优化数据库访问的第一步。你需要了解连接池的概念( 参见文章: 连接池(Connection Pooling)介绍 );了解 连接数据库的方法。另外,测试是很重要的,如果你想亲自进行测试,可以下载上一部分提到的 WAST ,它可以模拟大量用户同时 点击的情况。在这里,假设你使用的数据库是 MS SQL Server 7.0 ,如果 操作系统是 NT ,那么你可以在性能监视器中监测 SQL7 的用户连接数(counter:User Connections);如果操作系统是98的话,可以使用 SQL7 的 Profiler。 下面,开始讨论如何与数据库建立连接,以及连接池的问题。 1. 使用 OLEDB 与数据库建立连接有三种方法:DSN,DSN-less,OLEDB( 参见文章: 用ADO连接数据库的三种方法 )。建议使用 OLEDB。 2. 尽快释放数据库对象 假设有 page1.asp 和 page2.asp,在多人同时点击的情况下,服务器可能会这样工作: 第一个人:page1.asp 的1-5行, 第二个人:page1.asp 的1-5行, 第一个人:page1.asp 的6-20行, 第二个人:page1.asp 的1-5行, 第三个人:page1.asp 的1-5行, 第四个人:page1.asp 的1-5行, 第二个人:page1.asp 的6-20行, 第一个人:page2.asp 的1-5行, ...... 设想一下:有几千人同时访问你的主页,那么,服务器就会执行数千行,数万行语句后才回到第一个人请求的页面上。因此,我们 应尽可能快的处理某个功能,某个任务。看下列代码: <% rs1.Open strSQL1,cnn1 cnn1 is connection object rs2.Open strSQL2,cnn2 rs3.Open strSQL3,cnn3 ...... 处理 rs1 处理 rs2 处理 rs3 ...... rs1.Close rs2.Close rs3.Close cnn1.Close cnn2.Close cnn3.Close %> 这种处理结果集的方法会占用比你想象要多的资源,正确的用法应为: <% rs1.Open strSQL1,cnn cnn is connection object 处理 rs1 rs1.Close cnn1.Close ...... rs2.Open strSQL2,cnn 处理 rs2 rs2.Close cnn2.Close ...... rs3.Open strSQL3,cnn 处理 rs3 rs3.Close cnn3.Close ...... %> 或许你会说:在 rs2 的处理中,我还需要 rs1 的值,所以不能在处理 rs2 前关闭 rs1。那么解决这个问题更好的办法是采用 GetRows 和 GetString,在后面会有详细的说明。 尽快的释放对象是保证数据库连接重用的前提。( 参见文章: 让数据库的连接更有效 ) 3. 创建 Connection 对象,充分利用连接池。 看下列代码: 创建 Connection Object,打开 RecordSet Set cnn = Server.CreateObject("ADODB.Connection") cnn.Open strConnection Set rs = Server.CreateObject("ADODB.RecordSet") rs.Open strSQL,cnn 直接打开 RecordSet Set rs = Server.CreateObject("ADODB.RecordSet") rs.open strSQL,strConnection 在 asptoday 的 Enhancing Performance in ASP - Part 2 中对这两种方法进行了测试,结果表明直接打开 RecordSet 比创 建 Connection 快23%(快在页面处理上,检索数据库的速度是一样的。)所以,这篇文章的结论是:When working with a single Recordset,pass the connection string into the ActiveConenction property. 我对此有异议:快的代码不一定是好的代码。 首先要说明的是,直接打开 RecordSet 的方法依然要创建与数据库的连接,只不过是由 ADO 自动完成的。其次,这个 Connection 只有在该页面处理完后才能被释放(不管是 Recordset.Close 还是 Set recordset = Nothing 都不能做到释放该 对象)。 Dim rs Dim strcnn strcnn = "Driver={SQL Server};Server=.;Database=pubs;UID=sa;PWD=;OLE DB Services=-1;" For i = 1 To 20 Set rs = Server.CreateObject("ADODB.Recordset") rs.Open "SEL
最新教程推荐教程热点教程...
|

发表评论
告诉好友