io a dire la verità avevo creato questa funzione :
codice:
Private Function scrivivaluevuoto()
t_socion = rsonn.Fields("socio_n").Value = ""
t_brevetto = rsonn.Fields("brevetto").Value = ""
t_nome = rsonn.Fields("nome").Value = ""
t_cognome = rsonn.Fields("Cognome").Value = ""
t_turno = rsonn.Fields("turno").Value = ""
t_natoa = rsonn.Fields("nato_a").Value = ""
t_datanascita = rsonn.Fields("data_nascita").Value = ""
t_quota = rsonn.Fields("quotaversata").Value = ""
t_scadenza = rsonn.Fields("scadenza").Value = ""
t_ora = rsonn.Fields("ora").Value = ""
End Function
e l'ho richiamata così:
codice:
Private Sub b_nuovocliente_Click()
If b_nuovocliente.Caption = "NUOVO CLIENTE" Then
rsonn.AddNew
scrivivaluevuoto
b_nuovocliente.Enabled = False
End If
End Sub
ma mi dice utilizzo di null non valido quando clicco sul pulsanti aggiungi record 
poi questo update no riesco a capirlo.. ciè non dovrei inserirlo nel pulsante "salva record" ?
Thanx