2012-06-15 58 views
1

我有一个字符串,我已经拆分了一个逗号分隔符,并添加到一个数组,现在我需要按地址八个数组排序数组,前八个将是第一个地址,接下来的八个将成为下一个地址等......以html表输出。建议输出数组多个8

这样的..

id  addr1   addr2   addr3   add4 
1   12 road  birmingham westmid  u.k 

objSoapClient.serviceForPostcodeStringBuilder( “AB10 1AF”)返回的字符串。

<% 
dim address 
dim addArray 

SET objSoapClient = Server.CreateObject("MSSOAP.SoapClient") 
objSoapClient.ClientProperty("ServerHTTPRequest") = True 

Call objSoapClient.mssoapinit("http://ip address:56478/postcode/Service1.asmx?WSDL","Service1") 
response.write(session("collp")) 
address = objSoapClient.serviceForPostcodeStringBuilder("AB10 1AF") 
addArray = Split(address,",") 

%> 
+0

可以打破你的通过切片将数组分成小阵列 –

回答

1

在假设addArray有一个元素计数是8

Dim i 
For i = 0 To UBound(addArray) Step 8 
    %><tr><td><%=addArray(i)%></td><td><%=addArray(i+1>%></td><td><%=addArray(i+2)%></td></tr><% 
Next 

多个这里的关键特征是在for循环Step 8 ..