程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> 關於ASP編程 >> GetRows的用法詳解!

GetRows的用法詳解!

編輯:關於ASP編程
大家應該都知道 Recordset 有個 GetRows 屬性,但是真正使用的不多,我也是最近才用的!汗……

其實這個屬性很簡單,就是把數據集輸出到一個數組中。但是實用性可不小,在這裡我舉一個例子說明一下GetRows的使用方法,大家舉一反三能想到更多的用法!

比如一個分類的表 T_Cate,結構和數據如下:

ID   |   Title   |  Intro
-----------------------------------------
1    |   新聞   |  這裡是新聞
2    |   教程   |  這裡是教程
3    |   下載   |  這裡是下載

好了,表建立好了,數據也有了,下面我們就要用到GetRows咯!
復制代碼 代碼如下:
Dim Rs_Cate
Dim Arr_Cate
Set Rs_Cate=Conn.ExeCute("SELECT ID,Title,Intro FROM T_Cate ORDER BY ID ASC")
Arr_Cate=Rs_Cate.GetRows
Set Rs_Cate=Nothing

好了表數據已經導出到數組了!下面我們將遍歷這個數組
復制代碼 代碼如下:
Dim Arr_CateNumS,Arr_CateNumI
Arr_CateNumS=Ubound(Arr_Cate,2)  '得到數組中數據的下標
For Arr_CateNumI=0 To Arr_CateNumS
    Response.Write("ID:"&Arr_Cate(0,Arr_CateNumI)&" | 標題:"&Arr_Cate(1,Arr_CateNumI)&" | 介紹:"&Arr_Cate(2,Arr_CateNumI)&"<br>")
Next

呵呵,好了,輸出的數據為:
ID:1 | 標題:新聞 | 介紹:這裡是新聞
ID:2 | 標題:教程 | 介紹:這裡是教程
ID:3 | 標題:下載 | 介紹:這裡是下載

好了,具體就寫這麼多吧!文采不行,如果大家有什麼不明白的,多用用就可以了,呵呵

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved