手机版 | 登录 | 注册 | 留言 | 设首页 | 加收藏
联系客服
当前位置: 网站首页 > 程序技巧 > asp > 文章 当前位置: asp > 文章

asp用GetRows把数据集输出到一个数组中的实例

时间:2023-03-01    点击: 次    来源:网络    添加者:佚名 - 小 + 大

比如一个分类的表 T_Cate,结构和数据如下:

ID   |   Title   |  Intro
-----------------------------------------
1    |   新闻   |  这里是新闻
2    |   教程   |  这里是教程
3    |   下载   |  这里是下载

表建立好了,数据也有了,下面我们就要用到GetRows咯!

  CODE:
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


表数据已经导出到数组了!下面我们将遍历这个数组

输出的数据为:
ID:1 | 标题:新闻 | 介绍:这里是新闻
ID:2 | 标题:教程 | 介绍:这里是教程
ID:3 | 标题:下载 | 介绍:这里是下载

  CODE:  
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

分享按钮

上一篇:rs.AbsolutePosition为什么都是-1,有办法解决了

下一篇:access改mdb为asp所带来的灾难 附mdb防下载方法

豫ICP备19032584号-1  |   QQ:80571569  |  地址:河南濮阳市  |  电话:13030322310  |  
Copyright © 2024 FE内容付费系统 版权所有,授权www.xingwp.cn使用 Powered by 66FE.COM