Cosa cè di sbagliato? Mi dice che il database è di sola lettura!
'Registro i nuovi dati nel database
Data1.ReadOnly = False
Data1.Refresh
Data1.Recordset.MoveFirst
For i = 1 To Data1.Recordset.RecordCount
Data1.Recordset.Edit
Data1.Recordset!percentuale = Val(TxtComp(i - 1))
Data1.Recordset.Update
Next i
Data1.ReadOnly = True
Data1.Refresh

Rispondi quotando

Nessun altro? 