当数据库中读取很多的数据。

将他连成了字符串,格式如下:str=1###0###1***2###1###1_1***3###1###1_2***4###2###1_1_1***5###2###1_1_2***6###4###1_1_1_1***7###6###1_1_1_1_1

然后用先用arrResult=split(str,"***")将str分到数组中,接着再对arrResult数组的每条数据用arrTmp=split(arrResult(i),"###")来把他分到数组。

代码如下:

dim myarry()
arrResult=split(str,"***")
for i=0 to UBound(arrResult)
    arrTmp=split(arrResult(i),"###")
        for j=0 to UBound(arrTmp)
             redim myarry(UBound(arrResult),UBound(arrTmp))
             myarry(i,j)=arrTmp(j)
                 response.Write myarry(i,j)&"<br>"
        next
next

当我再
         for k=0 to ubound(myarry,1)
             response.Write myarry(k,1)&"<br>"
         next
想来显视时,怎么数组中的数据就没有了呢?

点赞(70)

评论列表共有 0 条评论

立即
投稿
返回
顶部