J'essai de faire un insert dans une table à partir d'un update et d'un DataGrid. Ce code fonctionne pour un select mais lorsque je le lance pour un insert (je change dans les variables StrSelect par StrInsert) j'ai un message d'erreur:"
An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll"
Je ne sais pas quoi faire, je n'ai rien trouvé sur intenet qui puisse m'aider.
Pouvez vous m'aider c'est urgent.
Merci
Voici le code:
Imports
System.Data.OleDb
Public
Class Frm_Menu
Inherits System.Windows.Forms.Form
Dim MyConnection As New OleDbConnection
Dim MyDataAdapter As New OleDbDataAdapter
Dim MyDataSet As New DataSet("Data")
Dim custCB As New OleDbCommandBuilder(MyDataAdapter)
Dim MyDataTable As New DataTable
Dim StrSelect As String = "SELECT * from CLIENT"
Dim StrInsert As String = "INSERT INTO CLIENT (Login,Nom_Prenom,Num_Tel,Droits,Departement) VALUES ('to78975','Bebert Marc',24578,'Utilis','m84')"
Dim MyCommand As OleDbCommand = New OleDbCommand(StrInsert, MyConnection)
Private Sub Frm_Menu_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Recherche User
Module1.GetLogon()
TextBox1.Text = Login
'Connection Base
MyConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=H:\Application_Catalogue\BD_Catalogue.mdb"
'Try
MyConnection.Open()
LoadData()
MyConnection.Close()
'Catch ex As Exception
'MessageBox.Show("Erreur de connection")
'End Try
End Sub
Private Sub LoadData()
MyDataAdapter.SelectCommand = MyCommand
MyDataAdapter.Fill(MyDataSet, "CLIENT")
MyDataAdapter.Update(MyDataSet, "CLIENT")
MyDataTable = MyDataSet.Tables("CLIENT")
DataGrid1.DataSource = MyDataSet
End Sub
End
Class