Discussion :

[hugnka]

Salut à tous je veux créer une application windows se reliant à une base de données access 2007.
En effet j'ai déjà conçu les interface et j'ai aussi ajouté une source de données mais je ne veux pas utiliser le glisser-déplacer pour le création de mes différents boutons de commande(Enregistrer,Modifier,Annuler et supprimer) que je veux faire par le code.
Mais je ne sais pas comment m'y prendre avec le dataset pour manipuler mes données. J'ai suivi le cours vb.net disponible sur le forum mais franchement je ne comprend rien donc je me tourne vers vous pour me donner un coup de main.

Merci pour les éventuelles réponses.

[Sankasssss]

Bonjour,

En effet j'ai déjà conçu les interface et j'ai aussi ajouté une source de données mais je ne veux pas utiliser le glisser-déplacer pour le création de mes différents boutons de commande(Enregistrer,Modifier,Annuler et supprimer) que je veux faire par le code.

C'est expliqué simplement dans "le cours vb.net disponible sur le forum" que ne comprenez-vous pas?

Mais je ne sais pas comment m'y prendre avec le dataset pour manipuler mes données. J'ai suivi le cours vb.net disponible sur le forum mais franchement je ne comprend rien donc je me tourne vers vous pour me donner un coup de main.

Pareil pour cette partie, cette portion du cours traite simplement les dataset et tout se qui touche à ADO.NET, que ne comprenez-vous pas?

Il y a aussi la FAQ qui traite de se sujet

Bref, personne sur le forum ne va vous refaire un cour personnel, il vous faut lire les cours / tuto / FAQ, et si vous ne comprenez pas quelque chose, vous postez une question précise avec un bout de code et des explications sur ce que vous avez essayé, c'est expliqué ici : Aide aux nouveaux arrivants sur Developpez.com

Cordialement

[hugnka]

Ok merci beaucoup

[hugnka]

Bonjour à tous. Voilà je me suis mis à apprendre les différentes méthodes du cours et essayé d'appliquer à mon cas. En fait j'ai un bouton"ENREGISTRER" qui me permet d'enregistrer les données entrées par l'utilisateur dans la base de données. Mais lorsque je clique sur celui-ci il me met le Msgbox me disant que cela a été enregistré mais quand je vais ouvrir la base de données directement sous access,rien n'est enregistré. Voici le code en question

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
 Private Sub Enregistrer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Enregistrer.Click
 
        Dim con As OleDbConnection
        Dim strsql As String
        Dim strcon As String
        Dim mbrerow As DataRow
        strcon = "Provider=Microsoft.ACE.OLEDB.12.0;" + "Data source=" + Environment.CurrentDirectory & "\EDAJC net.accdb;"
        strsql = "Select* from Membre"
        con = New OleDbConnection
        con.ConnectionString = strcon
        Try
            con.Open()
        Catch ex As OleDbException
            MsgBox(ex.Message)
        End Try
 
 
        Me.MembreTableAdapter.Fill(Me.EDAJC_netDataSet.Membre)
        mbrerow = EDAJC_netDataSet.Tables("Membre").NewRow
 
        mbrerow("Nom") = Me.TextBox2
        mbrerow("Prénoms") = Me.TextBox3
        mbrerow("Dat_adhé") = Me.Dat_adhéMaskedTextBox.TextMaskFormat
        mbrerow("Dat_Naiss") = Me.Dat_NaissMaskedTextBox.TextMaskFormat
        mbrerow("Sexe") = Me.ComboBox1
        mbrerow("Pays") = Me.TextBox5
        mbrerow("Ville") = Me.TextBox7
        mbrerow("Lang_parlée") = Me.TextBox8
        mbrerow("Tel") = Me.TelMaskedTextBox.TextMaskFormat
        mbrerow("Cel") = Me.CelMaskedTextBox.TextMaskFormat
        mbrerow("Nbre_enf") = Me.Nbre_enfNumericUpDown.TextAlign
        mbrerow("Type_memb") = Me.Type_membComboBox.Text
        mbrerow("Profession") = Me.ProfessionTextBox.Text
        mbrerow("Stat_marital") = Me.Stat_maritalComboBox.Text
        mbrerow("Département") = Me.DépartementComboBox
        mbrerow("Autre_départ") = Me.Autre_départComboBox
        mbrerow("Respo") = Me.RespoTextBox
        'Il me reste à ajouter l'image c'est pour ne pas oublier que je met ce commentaire
        EDAJC_netDataSet.Tables("Membre").Rows.Add(mbrerow)
        MsgBox("Membre enregisté avec succès", MsgBoxStyle.Information)
 
 
 
 
        con = Nothing
        MembreTableAdapter.Connection = Nothing
        EDAJC_netDataSet = Nothing
 
        mbrerow = Nothing
 
 
 
    End Sub

Pouvez-vous m'aider svp? et merci d'avance.

[Graffito]

Après l'ajout de la Row dans la DataTable, il manque:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
MembreTableAdapter.Update(EDAJC_netDataSet);