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

将他连成了字符串，格式如下：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
想来显视时，怎么数组中的数据就没有了呢？