怎么处理?
arrThis(0)(0)="10"
arrThis(0)(1)="800*600"
arrThis(0)(2)="5"
arrThis(0)(0)="10"
arrThis(0)(1)="1024*768"
arrThis(0)(2)="9"
这样的数组生成
10|800*600|5,10|1024*768|9
这样的字符串,格式要标准的.
问题点数:100、回复次数:2Top
1 楼yeefly(丰水犁)回复于 2003-12-03 12:46:20 得分 100
程序马上给你发过去~Top
2 楼yeefly(丰水犁)回复于 2003-12-03 12:52:53 得分 0
<%
strThis ="10|800*600|5,77|1024*600|9"
arrThis=split(strThis,",")
for i = 0 to uBound(arrThis)
arrThis(i)=split(arrThis(i),"|")
Next
response.write arrThis(0)(0) & " <br/>"
Response.write arrThis(0)(1)& " <br/>"
response.write arrThis(0)(2) & " <br/>"
response.write arrThis(1)(0) & " <br/>"
response.write arrThis(1)(1) & " <br/>"
response.write arrThis(1)(2) & " <br/>"
dim strNew
strNew=""
for i = 0 to uBound(arrThis)
for o = 0 to uBound(arrThis(i))
strNew = strNew & arrThis(i)(o) & "|"
Next
strNew = left(strNew , len(strNew)-1)
strNew = strNew & ","
Next
Response.Write strNew
%>Top




