技能：用GetString来进步ASP的速度

核心提示：很多ASP程序员都有过履行数据库查询，然后将查询结果用HTML表格的情势显示出来的经历吧。

很多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语句要处理. 假设你将输出的全部结果放在1个很长的字符串里(从

到)，那末服务器只需解释1遍Response.Write语句，速度就会快很多 . 微软公司里的1些能干的家伙已将想法变成了现实. (留意，这是1个ADO 2.0以上才有 的特性. 假设你还在使用之前版本的话,请升级到最新版)

有了GetString方法，我们便可以够仅用1个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中，这样我们只需1行Response.Write即可以输出数据集中的所有记录. 让我们来看个简单的例 子，假定我们的查询结果返回了以下的行和列：

以下为援用的内容： Col1 Col2 Col3 Row1 Bob Smith 40 Row1 Ed Frank 43 Row1 Sue Void 42

那末GetString语句返回的字符串将是：

<
td
>Ed ...

以下为援用的内容： Bob	Smith	40

说实话，这个字符串看上往冗杂而杂乱，但它就是我们想要的HTML代码。(留意看，我们在 手工书写的HTML代码中，将

放在Response.Write的前面，将

放在它的后面. 这是由于我们的格式化字符串中其实不含有这些表格 头尾所需的字符串。)

http://www.fw8.net/
TAG:内容,代码,字符串,语句,表格

评论加载中... 内容： 评论者： 验证码：