Si scusami sono stato troppo impulsivo.
Uso ASP classic
Allora la pagina con la form è la seguente:
<form action="convocazioni3.asp" method="post" name="form1">
<tr>
<%
i = 0
rsAnag.movefirst
x = rsAnag.recordcount
do while not rsAnag.eof
For i = 1 to x%>
<td></td>
<td><input type="text" name="Maglia" size="1" maxlength="2" class="casellaMaglia" onKeyUp="controllaMaglia()"></td>
<td><label class="label" type="text" size="8" name="Nome"><%=rsAnag.Fields.Item("Nome").Value%></label></td>
<td><label class="label" type="text" size="10" name="Cognome"><%=rsAnag.Fields.Item("Cognome").Va lue%></label></td>
<td align="center">
<label class="label">
<input type="radio" name="RadioGroup<%=x%>" value="0" id="RadioGroup_0">
No</label>
<label class="label">
<input type="radio" name="RadioGroup<%=x%>" value="1" id="RadioGroup_1" checked="checked">
Si</label>
<%rsAnag.movenext
x = x - 1
next
loop%>
Poi Submit

La pagina del post é:
Set cn1 = Server.CreateObject("ADODB.Connection")
cn1.Open strConn

Dat = request.Form("DataItalia")
Giorno = Mid(Dat, 1, 2)
Mese = Mid(Dat, 4, 2)
Anno = Mid(Dat, 7, 4)
DataAmerica = Mese&"/"&Giorno&"/"&Anno

no = replace(request.form("Nome"), "'", "''")
co = Replace(Request.Form("Cognome"), "'", "''")
motivo = request.Form("Motivo")
if request.Form("Maglia") <> "" then
Maglia = request.Form("Maglia")
else
Maglia = ""
end if


DivisioneNome = split(no,",")
DivisioneCognome = split(co,",")
DivisioneMotivo = split(motivo,",")
DivisioneMaglia = split(Maglia,",")
Numero = left(request.Form("serie"),instr(request.Form("ser ie"),",")-1)

for y = 1 to Numero
if request.Form("RadioGroup") & Numero = "0" then
Convocato = "0"
sql0 = "INSERT INTO T_Convocazioni"&session("StagioneAttuale")&" ( Convocato) " &_
"VALUES ( '" & trim(Convocato) & "')"
cn1.Execute sql0
elseif request.Form("RadioGroup") & Numero = "1" then
Convocato = "1"
sql1 = "INSERT INTO T_Convocazioni"&session("StagioneAttuale")&" ( Convocato) " &_
"VALUES ( '" & trim(Convocato) & "')"
cn1.Execute sql1
end if
Numero = Numero - 1
next

For i = LBound(DivisioneNome) to UBound(DivisioneNome)
sql2 = "INSERT INTO T_Convocazioni"&session("StagioneAttuale")&" ( Nome, Cognome, Categoria, Avversario, DataConvocazione, LuogoRitrovo, LuogoPartita, OraRitrovo, OraPartita, Accompagnatore, Ufficiale, Medico, Massaggiatore, Allenatore, Maglia) " &_
"VALUES ( '" & trim(DivisioneNome(i)) & "','" & trim(DivisioneCognome(i)) & "','" & Session("categoria") & "','" & Session("chi1") & "',#" & DataAmerica & "#,'" & Session("dove1") & "','" & Session("dovepartita1") & "','" & Session("quando") & "','" & Session("quandopartita") & "','" & Session("Acco1") & "','" & Session("Uff1") & "','" & Session("Med1") & "','" & Session("Mas1") & "','" & Session("All1") & "','" & trim(DivisioneMaglia(i)) & "')"
cn1.Execute sql2
next