大家应该都知道 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_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
好了表数据来源[email protected]搞@^&代*@码网已经导出到数组了！下面我们将遍历这个数组
代码如下:
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)&”
“)
Next
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)&”
“)
Next
呵呵，好了，输出的数据为：
ID：1 | 标题：新闻 | 介绍：这里是新闻
ID：2 | 标题：教程 | 介绍：这里是教程
ID：3 | 标题：下载 | 介绍：这里是下载
好了，具体就写这么多吧！文采不行，如果大家有什么不明白的，多用用就可以了，呵呵
以上就是GetRows的用法详解！的详细内容，更多请关注gaodaima搞代码网其它相关文章！
搞代码网（gaodaima.com）提供的所有资源部分来自互联网，如果有侵犯您的版权或其他权益，请说明详细缘由并提供版权或权益证明然后发送到邮箱[email protected]，我们会在看到邮件的第一时间内为您处理，或直接联系QQ：872152909。本网站采用BY-NC-SA协议进行授权
转载请注明原文链接：GetRows的用法详解！
转载请注明原文链接：GetRows的用法详解！
