Hola
Esto no es lo que te he indicado
Cita: for each maquina in Request.Form("maquina")
valCampos = Request.Form("maquina")
next
Sino
Cita: for each maquina in Request.Form
valCampos = valCampos & Request.Form(maquina)
next
Para hacer la consulta, usa la función
Join() como te indiqué anteriormente
Suerte