伊图教程网[www.etoow.com]
http://www.etoow.com/html/2008-01/1201325818.html
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 | 标题:下载 | 介绍:这里是下载
好了,具体就写这么多吧!文采不行,如果大家有什么不明白的,多用用就可以了,呵呵.
实例讲解ASP读取Recordset中的GetRows属性
'http://www.etoow.com/html/2008-01/1201325818.html