主题:  把ACCESS库中的记录用二维数组存储怎样来实现

xiaofeihong

职务:普通成员
等级:1
金币:0.0
发贴:35
#12005/7/11 10:55:51
我现在不能用二维数组来存储ACCESS库中的记录,希望那位高手能够给一指导.先谢了.



蓝鲸

职务:版主
等级:5
金币:42.1
发贴:2614
#22005/7/11 16:22:17
dim arrUser(2, 3)

arrUser(0, 0) = "张军"
arrUser(0, 1) = "男"
arrUser(0, 2) = "1988-8-8"
arrUser(0, 3) = "大专"

arrUser(1, 0) = "李青"
arrUser(1, 1) = "女"
arrUser(1, 2) = "1988-8-8"
arrUser(1, 3) = "本科"


非常大鱼

xiaofeihong

职务:普通成员
等级:1
金币:0.0
发贴:35
#32005/7/11 17:02:00
我的意思是从ACCESS库中利用循环把它存到定义的二维数组中,到时候页面显示的是时侯从二维表中取出来显示。



DavidPP

职务:普通成员
等级:1
金币:0.0
发贴:5
#42005/7/11 21:48:46
Rs.GetRows()



xiaofeihong

职务:普通成员
等级:1
金币:0.0
发贴:35
#52005/7/12 10:33:42
rs.getrows()从命令上看是从库中取当前记录,那下面的意思我有点不明白,请那位高手赐教。



DavidPP

职务:普通成员
等级:1
金币:0.0
发贴:5
#62005/7/12 11:21:49



绿茶

职务:普通成员
等级:8
金币:10.0
发贴:19267
#72005/7/12 16:24:08
k=rs.recordcount
dim city(50),city1(50,50),l(50)
if not rs.eof then
i=0
do while not rs.eof
    city(i)=rs("city")
    id(i)=rs("cityid")
    set obj=conn.execute("select * from city where parentid="&rs("cityid"))
    j=0
    do while not obj.eof
        city1(i,j)=replace(obj("city")," ","")
        id1(i,j)=obj("cityid")
        'response.write "city1("&i&","&j&")="&city1(i,j)&"<br>"
        j=j+1
    obj.movenext
    loop
    l(i)=j
    'response.write "<font color=red>l("&i&")="&j&"</font><br>"
i=i+1
rs.movenext
loop
end if