從外國的一個網站上找一個(用GetString來提高ASP的速度)我測試過了呀,是快了很多呀
來源:互聯網
上載者:User
許多ASP程式員都有過執行資料庫查詢,然後將查詢結果用HTML表格的形式顯示出
來的經
曆吧. 通常我們是這麼做的:
< %
“Create connection / recordset
“Populate data into recordset object
% >
< TABLE >
< % Do While not rs.EOF % >
< TR >
< TD >< %=rs("Field1")% >< /TD >
< TD >< %=rs("Field2")% >< /TD >
.
< /TR >
< % rs.MoveNext
Loop % >
< /TABLE >
如果查詢結果很多,伺服器解釋你的ASP script將花費大量的時間,因為有許多的
Response.Write語句要處理. 如果你將輸出的全部結果放在一個很長的字串裡
(從<
TABLE >到< /TABLE >),那麼伺服器只需解釋一遍Response.Write語句,速度就會
快得多
. 微軟公司裡的一些能乾的傢伙已經將想法變成了現實. (注意,這是一個ADO 2.
0才有
的特性. 如果你還在使用ADO 1.5話,可以在
http://www.microsoft.com/data/download.htm免費下載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
表格的
例子裡所看到的那樣,每列用< TD >...< /TD >分隔,每行用< TR >...< /TR >分
隔. 來
看看例子的代碼吧.
< %@ 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")