ecco il codice dell'aggiunta nel database

connessione.ConnectionString = ADOORDINI.ConnectionString
connessione.Open

SQLAGGIUNGI = "insert into ordine (codice_cli,data,quantita,importo_pezzo,saldo,nota _ordine) values ("
SQLAGGIUNGI = SQLAGGIUNGI & Val(txt_codice_cli.Text) & ","
SQLAGGIUNGI = SQLAGGIUNGI & txt_data.Text & ","
SQLAGGIUNGI = SQLAGGIUNGI & Val(txt_QUANTITA.Text) & ","
SQLAGGIUNGI = SQLAGGIUNGI & Val(txt_importo_pezzo.Text) & ","
SQLAGGIUNGI = SQLAGGIUNGI & Val(txt_saldo.Text) & ",'"
SQLAGGIUNGI = SQLAGGIUNGI & Txt_note.Text & "')"
comando.CommandText = SQLAGGIUNGI
comando.ActiveConnection = connessione
comando.Execute