¿Cuál linea en rojo?
Bueno, supongo que esta:
cbases=split(bases,",")
for i=0 to ubound(cbases)
items(cbases(i))=Request.Form("items_"&cbases(i))
Response.Write items_&bases(i)&"<br>"
next
Pero, eso solo te funciona si bases tiene números separados por comas y ya haz deginido items con casillas suficientes. ¿qué es lo que pretendes hacer al guardar los request en un vector?, ¿No te es más facil un FOR-EACH?
Código:
for each campo in request.form
for indice=1 to request.form(campo).count
response.write campo &"="&request.form(campo )(indice)&"<br>"
next
next%>
Saludos