websurvey for each?

tja!

har en applikation, där admin kan skapa en websurvey... då admin väljer att lägga till en radiobutton fråga kan han välja hur många svar som skall kopplas till frågan mha ; seperation... när jag sedan skriver ut frågan samt svarsalternativen så gör jag följande:

case "RADIO", "CHECKBOX"
			response.write("<table>")
			anOption = split(QuestionOptions, ";")
			OptionNum = ubound(anOption)

			'find out max length for each option
			for a=0 to OptionNum
				MaxOptionLength = len(anOption(a))
			next

			'arrange the options
			'if MaxOptionLength > 20 then
			'	ColumnPerRow = 3
			'end if
			
			'if MaxOptionLength > 50 then
			'	ColumnPerRow = 1
			'else
				if OptionNum < 5 then ColumnPerRow = 1
				if OptionNum < 2 then ColumnPerRow = 2
				if OptionNum > 5 then ColumnPerRow = 2
			'end if

			for a=0 to OptionNum
				if Columns >= ColumnPerRow then
					Columns = 0
					response.write("<tr valign=top>")
				end if
				Columns = Columns + 1
				response.write("	<td><input type=" & QuestionType & " name='" & QuestionID & "' [b]value=""" & trim(anOption(a)) & """[/b]> " & trim(anOption(a)) & "</td>")
			next

då ser vi att jag trycker in det de fyller i som svarsalternativ som value, men säg nu att jag vill trycka in siffror där istället, hur gör jag då? dvs att om det bara är ett svarsalternativ så skall den få value 1, om det är 9st så skall frågorna få value 1-9?? skulle det funka med en for each i cint(anOption(a))? har testat men får det inte att funka korrekt