2 for to ubound arrays

RFS · September 19th, 2014, 06:01 AM

Hi I'm having trouble getting data from 2 arrays to place in a subroutine:

Code:

<%
Dim delv_array
		delv_array = Split(Request.Form("delv_no"), ",")
		'Iterate through the array inserting tracking numbers for each delivery
		for x = 0 to ubound(delv_array) %>
		<br><br><%response.write(delv_array(x))%><br><br>
			<%for lineitem=0 to uBound(rspartarray) %>
			<br><br><%response.write(rspartarray(lineitem,0))%><br><br>
			<%Call ScomUpdateDate( trim(delv_array(x)),rspartarray(lineitem,0))	
		next
		next
	End if
	%>

The first next returns 1 value as expected but the 2 second next returns all of the array however I only require 1 value at a time, is there away to tell the for next to run once each time rather the then looping through all of the array everytime the first for ubound is run?

Many thanks

RFS

mat41 · September 21st, 2014, 07:39 PM

It sounds like your design approach wrong. Why would you have the second For loop if you never want to iterate through all of the records?

If you have a for loop and then want to do something once inside that for loop get rid of the nested for loop and just do the one thing you want to do. Or have I mis understood your post?

If not, where does 'rspartarray' come from? If this is a record set for example perhaps just execute a query inside your first for loop to get the correct 'rspartarray' value to pass into your routine...