提高ASP的速度的方法：GetString

许多ASP程序员都有过执行数据库查询，然后将查询结果用HTML表格的形式显示出来的经历。通常我们是这么做的：
　　以下是引用片段：
　　<%
　　’Create connection / recordset
　　’Populate data into recordset object
　　%>
　　

　　<% Do While not rs.EOF %>
　　
　　
　　
　　.
　　
　　<% rs.MoveNext
　　Loop %>
　　

<%=rs("Field1")% >

<%=rs("Field2")% >

　　如果查询结果很多，服务器解释你的ASP script将花费大量的时间，因为有许多的Response.Write语句要处理. 如果你将输出的全部结果放在一个很长的字符串里(从 到 )，那么服务器只需解释一遍Response.Write语句，速度就会快得多 . 微软公司里的一些能干的家伙已经将想法变成了现实. (注意，这是一个ADO 2.0以上才有的特性. 如果你还在使用以前版本的话,请升级到最新版)
　　有了GetString方法，我们就可以仅用一个Response.Write来显示所有的输出了，它就象是能判断Recordset是否为EOF的DO ... LOOP循环。
　　GetString的用法如下(所有的参数都是可选的)：
　　String = recordset.GetString(StringFormat， NumRows， ColumnDelimiter， RowDelimiter， NullExpr)
　　要从Recordset的结果里生成HTML表格，我们只需关心GetString的5个参数中的3个：
　　ColumnDelimiter(分隔记录集的列的HTML代码)，RowDelimiter(分隔记录集的行的HTML 代码)，和NullExpr(当前记录为空时应生成的HTML代码)。就象你在下面生成HTML表格的例子里所看到的那样，每列用 ...分隔，每行用 ...分隔。
　　例子的代码：
　　以下是引用片段：
　　<%@ LANGUAGE="VBSCRIPT" %>
　　<% Option Explicit ’Good coding technique
　　’Establish connection to DB
　　Dim conn
　　Set conn = Server.CreateObject("ADODB.Connection")
　　conn.Open "DSN=Northwind;"
　　’Create a recordset
　　Dim rs
　　Set rs = Server.CreateObject("ADODB.Recordset")
　　rs.Open "SELECT * FROM table1"， conn
　　’Store our one big string
　　Dim strTable
　　strTable = rs.GetString(，，""，""
　　，" ")
　　%>
　　
　　
　　
　　
　　

<% Response.Write(strTable) %>

　　
　　
　　<%
　　’Cleanup!
　　rs.Close
　　Set rs = Nothing
　　conn.Close
　　Set conn = Nothing
　　%>
　　strTable字符串用于存放我们从"SELECT * FROM table1"结果生成的HTML表格的代码。
　　HTML表格的每列之间都将有 的HTML代码，每行之间的HTML代码是 . GetString方法将输出正确的HTML代码并存放在strTable中，这样我们只需一行Response.Write便可以输出数据集中的所有记录. 让我们来看个简单的例 子，假设我们的查询结果返回了以下的行和列：
　　以下是引用片段：
　　Col1 Col2 Col3
　　Row1 Bob Smith 40
　　Row1 Ed Frank 43
　　Row1 Sue Void 42
　　GetString语句返回的字符串将是：
　　以下是引用片段：
　　BobSmith40<
　　td
　　>Ed ...
　　这个字符串看上去冗长而杂乱，但它就是想要的HTML代码。(注意看，我们在手工书写的HTML代码中，将放在它的后面. 这是因为我们的格式化字符串中并不含有这些表格 头尾所需的字符串。)

位律师回复