寫ASP程式時,一般情況總是使用的VBScript,不過也不只是這一種選擇,也可以用JScript。但在用JScript作為ASP的語言時,比用VBScript有一些小小的不方便,比如RecordSet的GetRows方法。
在ASP中操作資料庫,一般都要用到RecordSet對象,如果注重程式效率的話,可能就會用到RecordSet對象的GetRows方法,把記錄集對象轉換成數組,而運算元組在速度上將比用RecordSet對象的MoveNext方法快很多,而且可以在取出數組後儘早釋放RecordSet對象,從而減少資源的佔用,這也是最佳化ASP效能的一個方法。
在VBScript裡,用RecordSet.GetRows方法取到的是一個二維數組,裡面的資料可以通過遍曆數組的方式來取得。
假設現在有一個資料庫,其中有一個表名為mytable,有3個欄位,名稱分別為id,first,second。
程式碼:
- '' code by xujiwei
- '' http://www.xujiwei.cn/
- '' 定義變數
- Dim conn,rs,data,recN,i
- '' 串連資料庫
- Set conn=Server.CreateObject("ADODB.Connection")
- conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &_
- Server.MapPath("data.mdb")
- '' 擷取記錄集
- Set rs=conn.Execute("SELECT id,first,second FROM mytable")
- '' 擷取資料數組
- data=rs.GetRows()
- '' 關閉記錄集,釋放對象
- rs.Close()
- Set rs=Nothing
- '' 擷取記錄數
- recN=UBound(data,2)
- '' 迴圈輸出資料
- For i=0 To recN
- '' 注意,數組下標從0開始
- '' 顯示資料庫中資料
- Response.Write("ID: "&data(0,i)&", First: "&data(1,i)&_
- ", Second: "&data(2,i)&"<br />")
- Next
- '' 關閉資料庫連接,釋放對象
- conn.Close()
- Set conn=Nothing
- %>