Sto cercando di inserire dei dati in un tabella access (id_articolo è univo e auto incrementale , io ho inserito un valore null, è corretto??) ma nn riesco a capire qual'è l'errore e come posso fare a visualizzare l'errore utilizzando Try catch..
Qualcuno sarebbe così gentile da darmi qualche dritta?
Grazie 1000!
Imports System.Data
Imports System.Data.OleDb
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim PercorsoDB As String = "C:\db.mdb"
Dim objConnection As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; " & "Data Source=" & PercorsoDB)
Dim objCommand As OleDbCommand = New OleDbCommand()
objCommand.CommandText = "insert into Articoli" & _
"(id_articolo,articolo,descrizione,prezzo,misu ra) " & _
"values(id_articolo, articolo, descrizione, prezzo, misura);"
' Set Variables
objCommand.Parameters.AddWithValue("id_articolo", DBNull.Value)
objCommand.Parameters.AddWithValue("articolo", TBCodice.Text)
objCommand.Parameters.AddWithValue("descrizione", TBDescrizione.Text)
objCommand.Parameters.AddWithValue("prezzo", TBPrezzo.Text)
objCommand.Parameters.AddWithValue("misura", TBMisura.Text)
' Open Conn
objConnection.Open()
' Execute Command
Try
objCommand.ExecuteNonQuery()
Catch ???
MessageBox.Show(???)
End Try
' Close Conn
objConnection.Close()
End Sub
