ok
Entonces sería con algo como esto:
Código ASP:
Ver originalvecPantallas = SPLIT(Request("ckPantalla"),",")
For i=0 To Ubound(vecPantallas)
vSQL = "EXEC iInsertaPantallasAlRol " & Request("HidId") & ", '" & Trim(vecPantallas(i)) & "'"
Con.Execute (vSQL)
Next
donde
Request("ckPantalla") es el parámetro del listBox que mandas al ASP, el chiste es separarlo con un SPLIT e insertar cada dato
Saludos