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 想來顯視時，怎么數組中的數據就沒有了呢？
