Il campo che contiene --> R1, R3, R4, R6, R7 è un array, quindi devi splittare e iterarlo e poi assegnare all'interno dell'iterazione i singoli valori ai checkbox.
codice:
<%
tuoCampo = "R1,R3,R4,R6,R7"
chArray = split(tuoCampo, ",")
for i = 0 to uBound(chArray)
select case chArray(i)
case "R1"
response.write"<input type='checkbox' name='insrulli' value='" & chArray(i) & "' checked>")
case "R3"
response.write"<input type='checkbox' name='insrulli' value='" & chArray(i) & "' checked>")
case "R4"
response.write"<input type='checkbox' name='insrulli' value='" & chArray(i) & "' checked>")
case "R6"
response.write"<input type='checkbox' name='insrulli' value='" & chArray(i) & "' checked>")
case "R7"
response.write"<input type='checkbox' name='insrulli' value='" & chArray(i) & "' checked>")
end select
next
%>