源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

GetRows的用法详解!

  • 时间:2020-09-23 16:44 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:GetRows的用法详解!
大家应该都知道 Recordset 有个 GetRows 属性,但是真正使用的不多,我也是最近才用的!汗…… 其实这个属性很简单,就是把数据集输出到一个数组中。但是实用性可不小,在这里我举一个例子说明一下GetRows的使用方法,大家举一反三能想到更多的用法! 比如一个分类的表 T_Cate,结构和数据如下: ID   |   Title   |  Intro ----------------------------------------- 1    |   新闻   |  这里是新闻 2    |   教程   |  这里是教程 3    |   下载   |  这里是下载 好了,表建立好了,数据也有了,下面我们就要用到GetRows咯!
[u]复制代码[/u] 代码如下:
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
好了表数据已经导出到数组了!下面我们将遍历这个数组
[u]复制代码[/u] 代码如下:
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 | 标题:下载 | 介绍:这里是下载 好了,具体就写这么多吧!文采不行,如果大家有什么不明白的,多用用就可以了,呵呵
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部