Dunque, il codice è un pò difficile postarlo.
Ho una procedura Salva
codice:
If buf_fattura Is Nothing Then
Set buf_fattura = New clsFattura
riempiBuffer
buf_fattura.Aggiungi 'inserisco nuova fattura
Else
riempiBuffer
buf_fattura.Update 'modifico fattura esistente
End If
quando eseguo una modifica richiamo la procedura Update
codice:
mvarIDFattura = buf_fattura.IDFattura
miaSQL = "Update TBFatture set DataFattura=#" & Format (buf_fattura.DataFattura, "mm/dd/yyyy") & "#," & _
"Fornitore=""" & buf_fattura.Fornitore & """,NumeroFattura=""" & buf_fattura.NumeroFattura & ""","
miaSQL = miaSQL & "Importo=""" & buf_fattura.Importo & """"
miaSQL = miaSQL & ",[Note]=""" & buf_fattura.Note & """"
miaSQL = miaSQL & " where idfattura=" & mvarIDFattura
MiaConn.Execute miaSQL
Spero di essere stata chiara