Dim abc As String
        abc = "INSERT INTO utenti (`id`, `nome`, `cognome`, `telefono`, `cellulare`, `via`) VALUES (``,`mario`,`rossi`,`0000`,`0000`,`verdi`)"
        Dim cmd As New OleDbCommand(abc, archivio)
        archivio.Open()
        cmd.ExecuteNonQuery()