qualcuno mi dice dove cavolo sbaglio ??? x favore...sono disperato !
codice:
Private Sub cmdSalva_Click()
Dim id_ut, des, ref, note As String
Dim SQL As String
Dim conferma As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
db_path = CurDir & "\Template_GenCode.mdb"
connString = "Provider=Microsoft.Jet.oledb.4.0; Data Source=" & db_path
cn.ConnectionString = connString
cn.Open
id_ut = txtIdCliente.Text
des = txtDesCliente.Text
ref = txtRefCliente.Text
note = txtNoteCliente.Text
lblMessaggio.Caption = id_ut
SQL = "UPDATE Clienti SET desCliente = " & des & ", referente = " & ref & ", note = " & note & " WHERE IDCliente = " & id_ut
' ESEGUO REALMENTE IL COMANDO SQL
cn.Execute (SQL)
conferma = "Modifica effettuata con successo"
lblMessaggio.Caption = conferma
cn.Close
:master: