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

评论 (0) All

登陆 还没注册？