Salve, il problema si � spostato ed � questo. Ho una pagina asp costruita con un recordset, il quale pi� contenere N record. In questa pagina ho una form cos� composta.
Maglia Nome Cognome Convocato Motivo
Il campo Maglia lo edito
I campi Nome e Cognome li recupero da recordset
Il campo Motivo lo edito
Il campo Convoato � di tipo checkbox
Qui il codice di questa prima pagina:
codice:
Set rsAnag = Server.CreateObject("ADODB.Recordset")
rsAnag.ActiveConnection = strConn
DataUsa = "#"&DataUsa&"#"
rsAnag.Source = "SELECT Nome, Cognome, Id FROM [T_Anag_Clienti"&session("StagioneAttuale")&"] WHERE DateDiff('d',"&DataUsa&",[Certificato])>=1 AND ([T_Anag_Clienti"&session("StagioneAttuale")&"].Stato)='ATTIVO' and Categoria='" & Session("categoria") & "' ORDER BY [T_Anag_Clienti"&session("StagioneAttuale")&"].Cognome"
rsAnag.CursorType = 0
rsAnag.CursorLocation = 3
rsAnag.LockType = 3
rsAnag.Open()
%>
<form action="convocazioni3.asp" method="post" name="form1">
<tr>
<%
i = 0
rsAnag.movefirst
x = rsAnag.recordcount
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").Value%></label></td>
<td align="center"><input type="checkbox" size="3" name="Convocato" value="1" checked="checked"></td>
<td><input type="text" name="Motivo" class="casellaTestoLong"></td>
</tr>
<input type="hidden" name="Nome" value="<%=rsAnag.Fields.Item("Nome").Value%>">
<input type="hidden" name="Cognome" value="<%=rsAnag.Fields.Item("Cognome").Value%>">
<input type="hidden" name="serie" value="<%=x%>" />
<input type="hidden" name="DataItalia" value="<%=DataItalia%>">
<% rsAnag.movenext
x = x - 1
next
wend%>
<tr>
<td><input type="submit" name="Insert" value="CARICA" title="CARICA" class="bottonicarica"></td>
</form>
</tr>
Nella pagina CONVOCAZIONI3.asp recupero i dati e li inserisco nella tabella.
codice:
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")
Convocato = request.Form("Convocato")
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,",")
For i = LBound(DivisioneNome) to UBound(DivisioneNome)
sql1 = "INSERT INTO T_Convocazioni"&session("StagioneAttuale")&" ( Nome, Cognome, DataConvocazione, Maglia, Convocato) " &_
"VALUES ( '" & trim(DivisioneNome(i)) & "','" & trim(DivisioneCognome(i)) & "',#" & DataAmerica & "#,'" & trim(DivisioneMaglia(i)) & "','" & Convocato(i) & "')"
cn1.Execute sql1
next
Il problema sorge quando vado a inserire il campo convocato, poich� se faccio la insert escludendo tale campo non ci sono problemi e tutto fila liscio.
Vi prego datemi una manona non s� pi� che pesci prendere