asp一个数组重组的问题
0,1|a,b也可能是11,22,33|aa,bb,cc|只有一个但11,22,33,44...这个是不定的我要变成如:0,1|a,b变成0,a|1,b11,22,33|...
0, 1|a,b 也可能是 11,22,33|aa,bb,cc
| 只有一个 但11,22,33,44...这个是不定的
我要变成如:0, 1|a,b 变成 0,a|1,b
11,22,33|aa,bb,cc 就是要变成 11,aa | 22,bb| 33,cc
能重组的过来吗 展开
| 只有一个 但11,22,33,44...这个是不定的
我要变成如:0, 1|a,b 变成 0,a|1,b
11,22,33|aa,bb,cc 就是要变成 11,aa | 22,bb| 33,cc
能重组的过来吗 展开
1个回答
展开全部
function formatStr(str)
dim arr,arr1,arr2,i
arr=split(str,"|")
if ubound(arr)<>1 then exit function
arr1=split(arr(0),",")
arr2=split(arr(1),",")
if ubound(arr1)<>ubound(arr2) then exit function
for i=0 to ubound(arr1)
formatStr=formatStr&"|"&arr1(i)&","&arr2(i)
next
formatStr=mid(formatStr,2)
end function
response.write(formatStr("11,22,33|aa,bb,cc"))
dim arr,arr1,arr2,i
arr=split(str,"|")
if ubound(arr)<>1 then exit function
arr1=split(arr(0),",")
arr2=split(arr(1),",")
if ubound(arr1)<>ubound(arr2) then exit function
for i=0 to ubound(arr1)
formatStr=formatStr&"|"&arr1(i)&","&arr2(i)
next
formatStr=mid(formatStr,2)
end function
response.write(formatStr("11,22,33|aa,bb,cc"))
追问
是这样的数组呢?
0, 0, 0, 0, 0|1, 2, 3, 4, 5|a, b, c, d, e|aa, bb, cc, dd, ee
现在固定是 3个 | 固定
里面的逗号不固定
追答
function formatStr(str)
dim arr,n,i
arr=split(replace(str,"|",","),",")
n=ubound(arr)
if n mod 21 then exit function
n=n\2
for i=0 to n
formatStr=formatStr&"|"&arr(i)&","&arr(i+n+1)
next
formatStr=mid(formatStr,2)
end function
response.write(formatStr("0,0,0,0,0|1,2,3,4,5|a,b,c,d,e|aa,bb,cc,dd,ee"))
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询