Ho questo script che mi richiama i dati da un form e li mette in una singola colonna. Come posso fare per farmeli dividere in 2 colonne?


codice:
' Richiama i prodotti con valori > 0
for each objField in Request.Form
	if Left(objField, 8) = "prod_id_" AND IsNumeric(Request.Form(objField)) then
		if Clng(Request.Form(objField)) > 0 then
			Redim preserve aryProducts(ii)
			aryProducts(ii) = Replace(objField, "prod_id_", "")
			ii = ii + 1
		end if	
	end if
next

jj = 0
strProducts = "<table border=""1"" bordercolor=""#000000"" cellpadding=""5""><tr><th>Prodotto</th><th>Codice</th><th>Quantità</th></tr>"
for jj = 0 to Ubound(aryProducts)
	strProducts = strProducts & "<tr>" &_
	"<td>" & Request.Form("prod_descr_" & aryProducts(jj)) & "</td>" &_
	"<td>" & Request.Form("prod_code_" & aryProducts(jj)) & "</td>" &_
	"<td>" & Request.Form("prod_id_" & aryProducts(jj)) & "</td>" &_
	"</tr>"
next
strProducts = strProducts & "</table>"