ciao a tutti mi dite dov'è l'errore in questa operazione per inserire nuovi dati in un database
Public connessione As New ADODB.Connection
Public risultato As New ADODB.Recordset
Private Sub aggiungere_Click()
percorso = "G:\Andrea\prove visual basic\prova.mdb"
connessione.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & percorso & ";Persist Security Info=False"
risultato.Open "insert into prova(nome)" & " values('" & valnome & "')", connessione
Do Until risultato.EOF
nome.Text = risultato("nome")
cognome.Text = risultato("cognome")
risultato.MoveNext
Loop
End Sub