Buon pomeriggio a tutti,
ho un problemino sull'aggiornamento dei record checkati.
In un modulo ho vari campi.
Ecco il modulo:
Dovrei fare in modo che fleggo i record da modificare aggiorno il campo da modificare (Per esempio codArticolo) e poi premo su "Aggiorna".codice:<form id="form1" name="form1" method="post" action=""> <table width="1000" border="0" cellspacing="0" cellpadding="0"> <tr> <td align="left"><table width="1000" border="0" cellspacing="0" cellpadding="0"> <tr> <td width="100" align="left" class="testo">Art.</td> <td width="10" align="left" class="testo">[img]immagini/null.png[/img]</td> <td width="500" align="left" class="testo">Descrizione</td> <td width="11" align="left">[img]immagini/null.png[/img]</td> <td width="70" align="right" class="testo">Quantità</td> <td width="11" align="left">[img]immagini/null.png[/img]</td> <td width="102" align="right" class="testo">Prezzo</td> <td width="11" align="left">[img]immagini/null.png[/img]</td> <td width="82" align="right" class="testo">Sconto</td> <td width="11" align="left" class="testo">[img]immagini/null.png[/img]</td> <td width="82" align="right" class="testo">Importo</td> <td width="11" align="right" class="testo">[img]immagini/null.png[/img]</td> <td width="100" align="right" class="testo"></td> </tr> <tr> <td colspan="13">[img]immagini/null.png[/img]</td> </tr> <% While ((Repeat33__numRows <> 0) AND (NOT rs_dettaglioFatturaAggiorna.EOF)) %> <tr> <td align="left" class="testo"><label> <input name="codArticoloAggiorna" type="text" class="campiModulo" id="codArticoloAggiorna" value="<%=(rs_dettaglioFatturaAggiorna.Fields.Item("codArticolo").Value)%>" size="15" /> </label></td> <td align="left" class="testo"></td> <td align="left" class="testo"><input name="descrizioneAggiorna" type="text" class="campiModulo" id="descrizioneAggiorna" value="<%=(rs_dettaglioFatturaAggiorna.Fields.Item("descrizione").Value)%>" size="60" /></td> <td></td> <td align="right" class="testo"><input name="quantitaAggiorna" type="text" class="campiModulo" id="quantitaAggiorna" value="<%=(rs_dettaglioFatturaAggiorna.Fields.Item("quantita").Value)%>" size="5" /></td> <td></td> <td align="right" class="testo"><% prezzo = replace(rs_dettaglioFatturaAggiorna("prezzo"),".","") prezzoDef = FormatNumber(prezzo,2) %> <input name="prezzoAggiorna" type="text" class="campiModulo" id="prezzoAggiorna" value="<%=prezzoDef%>" size="6" /> </td> <td></td> <td align="right" class="testo"><% sconto = FormatNumber(rs_dettaglioFatturaAggiorna("sconto"),2) %> <input name="scontoAggiorna" type="text" class="campiModulo" id="scontoAggiorna" value="<%=sconto%>" size="6" /> </td> <td align="right" class="testo"></td> <td align="right" class="testo"><% importo = replace(rs_dettaglioFatturaAggiorna("importo"),".","") importoDef = FormatNumber(importo,2) %> <input name="importoAggiorna" type="text" class="campiModulo" id="importoAggiorna" value="<%=importoDef%>" size="6" /> </td> <td align="right" class="testo"></td> <td align="right" class="testo"><label> <input type="checkbox" name="rimuoviArticolo" id="rimuoviArticolo" value="<%=(rs_dettaglioFatturaAggiorna.Fields.Item("id_fattura").Value)%>"/> </label></td> </tr> <tr> <td colspan="13" align="left">[img]immagini/null.png[/img]</td> </tr> <% Repeat33__index=Repeat33__index+1 Repeat33__numRows=Repeat33__numRows-1 rs_dettaglioFatturaAggiorna.MoveNext() Wend %> <tr> <td colspan="13" align="right"><input name="idFatturaAggiornaArticolo" type="hidden" id="idFatturaAggiornaArticolo" value="<%=(rsDatiFattura.Fields.Item("id_datiFattura").Value)%>" /> <input name="MM_update" type="hidden" id="MM_update" value="form1" /> <input name="buttonRimuoviArticoli2" type="submit" class="bottoniModuli" id="buttonRimuoviArticoli2" value="Aggiorna" /></td> </tr> </table></td> </tr> </table> </form>
Questo è lo script per l'aggiornamento:
Il fatto è che lui mi fa tanti aggiornamenti per quanti fleg metto.codice:<% If (CStr(Request("MM_Update")) = "form1") Then Dim MM_aggiornaArticolo Set MM_aggiornaArticolo = Server.CreateObject ("ADODB.Command") MM_aggiornaArticolo.ActiveConnection = MM_scadenzarioDomini_STRING listaAggiornaArticolo = request.Form("rimuoviArticolo") elencoAggiornaArticolo=split(listaAggiornaArticolo,",") For nElencoAggiornaArticolo=0 to ubound(elencoAggiornaArticolo) MM_aggiornaArticolo.CommandText = "UPDATE dettaglioFattura SET codArticolo = '" & Request.Form("codArticoloAggiorna") & "' WHERE id_fattura = " & elencoAggiornaArticolo(nElencoAggiornaArticolo) & "" Response.Write(MM_aggiornaArticolo.CommandText) MM_aggiornaArticolo.Prepared = true MM_aggiornaArticolo.Execute next MM_aggiornaArticolo.ActiveConnection.Close 'Response.Redirect("fattura_aggiornaFattura.asp?id_datiFattura=" & Request.Form("idFatturaAggiornaArticolo")) End if %>
Solo che non mi riesce a separare i codici articolo e dopo l'aggiornamento mi ritrovo i codici tutti uguale su ogni campo.
Per esempio se prima avevo questa situazione:
Cod Articolo
coda
codb
codc
Dopo l'aggiornamento avrò su tutti e tre i record nel campo codArticolo:
Cod Articolo
coda, codb, codc
coda, codb, codc
coda, codb, codc
Potete cortesemente aiutarmi?
Grazie a tutti in anticipo.
![]()

Rispondi quotando