Bonjour a tous, j'ai un petit soucis pour ajouter une colonne dans ma base de donnée accès. Si vous voulez je suis quasi certain que ma colonne a été ajouter dans ma DataTable de mon DataSet mais ne me l'inscrit pas dans ma base de donnée. Met aucun message d'erreur. D'où peut provenir mon erreur?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
            Me.ObjetDataColumn = New DataColumn
            Me.ObjetDataColumn.DataType = GetType(String)
            Me.ObjetDataColumn.ColumnName = NouveauNumeroClient
            Me.ObjetDataSet.Tables("Affaires").Columns.Add(ObjetDataColumn)
 
            Me.ObjetConnectionAffaires.Open()
 
            Me.ObjetCommandBuilderAffaires = New OleDbCommandBuilder(ObjetDataAdapterAffaires)
            Me.ObjetCommandBuilderAffaires.GetUpdateCommand()
            Me.ObjetDataAdapterAffaires.Update(ObjetDataSet, "Affaires")
 
            Me.ObjetConnectionAffaires.Close()
Sachant que j'ai déjà réussi a créer des lignes avec le code qui suit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
            Me.ObjetDataRow = ObjetDataSet.Tables("Affaires").NewRow()
            Me.ObjetDataRow("CLI00001") = NomSocieteCC.Text
            Me.ObjetDataSet.Tables("Affaires").Rows.Add(ObjetDataRow)
 
            Me.ObjetConnectionAffaires.Open()
 
            Me.ObjetCommandBuilderAffaires = New OleDbCommandBuilder(ObjetDataAdapterAffaires)
            Me.ObjetCommandBuilderAffaires.GetUpdateCommand()
            Me.ObjetDataAdapterAffaires.Update(ObjetDataSet, "Affaires")
 
            Me.ObjetConnectionAffaires.Close()
Donc ce que je souhaite dire c'est que ce code-ci fonctionne a priori :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
            Me.ObjetConnectionAffaires.Open()
 
            Me.ObjetCommandBuilderAffaires = New OleDbCommandBuilder(ObjetDataAdapterAffaires)
            Me.ObjetCommandBuilderAffaires.GetUpdateCommand()
            Me.ObjetDataAdapterAffaires.Update(ObjetDataSet, "Affaires")
 
            Me.ObjetConnectionAffaires.Close()
Par contre lors de ma création de colonne il doit me manquer quelque chose a dire mais quoi? Merci pour votre aide.