<%
'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>
如果查詢結(jié)果很多,服務(wù)器解釋你的ASP script將花費(fèi)大量的時(shí)間,因?yàn)橛性S多的Response.Write語(yǔ)句要處理. 如果你將輸出的全部結(jié)果放在一個(gè)很長(zhǎng)的字符串里(從 到 ),那么服務(wù)器只需解釋一遍Response.Write語(yǔ)句,速度就會(huì)快得多 . 微軟公司里的一些能干的家伙已經(jīng)將想法變成了現(xiàn)實(shí). (注意,這是一個(gè)ADO 2.0以上才有的特性. 如果你還在使用以前版本的話,請(qǐng)升級(jí)到最新版)
有了GetString方法,我們就可以僅用一個(gè)Response.Write來(lái)顯示所有的輸出了,它就象是能判斷Recordset是否為EOF的DO ... LOOP循環(huán)。
GetString的用法如下(所有的參數(shù)都是可選的):
String = recordset.GetString(StringFormat, NumRows, ColumnDelimiter, RowDelimiter, NullExpr)
要從Recordset的結(jié)果里生成HTML表格,我們只需關(guān)心GetString的5個(gè)參數(shù)中的3個(gè):
ColumnDelimiter(分隔記錄集的列的HTML代碼),RowDelimiter(分隔記錄集的行的HTML 代碼),和NullExpr(當(dāng)前記錄為空時(shí)應(yīng)生成的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")
rs.Open "Select * FROM table1", conn
'Store our one big string
Dim strTable
strTable = rs.GetString(,,"</td ><td >","</td ></tr ><tr ><td >" ," ")
%>
<HTML>
<BODY>
<TABLE>
<TR ><TD>
<% Response.Write(strTable) %>
</TR ></TD>
</TABLE>
</BODY>
</HTML>
<%
'Cleanup!
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>
strTable字符串用于存放我們從"Select * FROM table1"結(jié)果生成的HTML表格的代碼。
HTML表格的每列之間都將有[/td][td]的HTML代碼,每行之間的HTML代碼是[/td][/td][tr][td]. GetString方法將輸出正確的HTML代碼并存放在strTable中,這樣我們只需一行Response.Write便可以輸出數(shù)據(jù)集中的所有記錄. 讓我們來(lái)看個(gè)簡(jiǎn)單的例 子,假設(shè)我們的查詢結(jié)果返回了以下的行和列:
以下是引用片段:
Col1 Col2 Col3
Row1 Bob Smith 40
Row1 Ed Frank 43
Row1 Sue Void 42
GetString語(yǔ)句返回的字符串將是:
以下是引用片段:
Bob</td ><td >Smith</td ><td >40</td ><td ></td ></tr ><tr ><
td
>Ed ... Bob</td ><td >Smith</td ><td >40</td ><td ></td ></tr ><tr >< td >Ed ...
這個(gè)字符串看上去冗長(zhǎng)而雜亂,但它就是想要的HTML代碼。(注意看,我們?cè)谑止?shū)寫(xiě)的HTML代碼中,將放在它的后面. 這是因?yàn)槲覀兊母袷交址胁⒉缓羞@些表格 頭尾所需的字符串。)
用GetString提高ASP的速度
2019-09-28 11:34asp教程網(wǎng) ASP教程
許多ASP程序員都有過(guò)執(zhí)行數(shù)據(jù)庫(kù)查詢,然后將查詢結(jié)果用HTML表格的形式顯示出來(lái)的經(jīng)歷。通常我們是這么做的:
延伸 · 閱讀
- 2021-10-20關(guān)于ASP網(wǎng)頁(yè)無(wú)法打開(kāi)的解決方案
- 2021-10-14讓apache也支持asp環(huán)境的方法
- 2021-08-15asp取整數(shù)mod 有小數(shù)的就自動(dòng)加1
- 2021-08-15asp與php中定時(shí)生成頁(yè)面的思路與代碼
- 2021-05-09IIS 7.5 asp Session超時(shí)時(shí)間設(shè)置方法
- 2021-03-05js實(shí)現(xiàn)的類似于asp數(shù)據(jù)字典的數(shù)據(jù)類型代碼實(shí)例
- ASP教程
JScript中遍歷Request表單參數(shù)集合的方法
這篇文章主要介紹了JScript中遍歷Request表單參數(shù)集合的方法,本文以遍歷Request.QueryString集合為例給出了實(shí)現(xiàn)代碼,需要的朋友可以參考下...
- ASP教程
ASP常用函數(shù):getpy()
ASP常用函數(shù):getpy()...
- ASP教程
ASP.NET 數(shù)據(jù)源
數(shù)據(jù)源 一個(gè) data sourse 控件與數(shù)據(jù)綁定的控件相互作用,并隱藏了復(fù)雜的數(shù)據(jù)的聯(lián)編過(guò)程。這些是提供數(shù)據(jù)給 data bound 控件的工具,并且支持如插入,刪除...
- ASP教程
asp Access數(shù)據(jù)備份,還原,壓縮類代碼
asp Access數(shù)據(jù)備份,還原,壓縮類實(shí)現(xiàn)代碼,大家可以參考下。...
- ASP教程
asp 標(biāo)記字符串中指定字符變色不區(qū)分大小寫(xiě)
今天遇到這種問(wèn)題,單純的使用replace函數(shù)不行,他會(huì)改變?cè)械淖址拇笮?xiě),在網(wǎng)上找到相關(guān)的代碼,自己備份下...
- ASP教程
asp之基于adodb.stream的文件操作類
asp之基于adodb.stream的文件操作類...
- ASP教程
asp 采集實(shí)戰(zhàn)代碼
最近實(shí)在是太流行采集了,本人是不喜歡采集的,但對(duì)采集的原理我卻很有興趣進(jìn)行研究,拿到了網(wǎng)上采集常用函數(shù),對(duì)其進(jìn)行了一番研究,并實(shí)戰(zhàn),結(jié)果...
- ASP教程
asp+javascript實(shí)現(xiàn)404頁(yè)的處理轉(zhuǎn)換
asp+javascript實(shí)現(xiàn)404頁(yè)的處理轉(zhuǎn)換...