Discussion :

[oshigamie]

Bonjours je me retrouve coincer suite a une erreur donc je ne connait pas du tout la solution .
dans l'application je souhaite inserer les champs que j'ai remplis dans mon application mais lors de cet action ( via un bouton) je me retrouve avec cet erreur

Cannot add or update a child row: a foreign key constraint fails (`stage`.`materiel`, CONSTRAINT `materiel_ibfk_1` FOREIGN KEY (`numeroCategories`) REFERENCES `categoriemateriel` (`NumeroCategorie`) ON DELETE CASCADE ON UPDATE CASCADE).

je vous donne le code gerant cet insertion

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
Private Sub BtnAjouterPO_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnAjouterPO.Click
 
 
        If CbMarque2.Text <> "" Then
            Dim a As String
            Dim b As String
            Dim c As String
            Dim d As String
            Dim i As String
            Dim f As String
            Dim g As String
            Dim h As String
            Dim j As String
 
            a = Txtidmateriel.Text
            b = CbMarque2.Text
            c = txtDesignation.Text
            d = CbCategorie2.Text.ToString
            i = Cbreference.Text
            f = TxtTaille2.Text
            g = TxtPrix.Text
            j = txtquantiter.Text
 
            h = b & " " & c & " " & f
 
            connection.MaRequete = "Insert into materiel Values ( " & a & " , '" & h & "', " & g & " ," & j & " ,'" & i & "' , '" & d & "' )"
            connection.MaCommandeSpecialRequete.CommandText = connection.MaRequete
            connection.MaCommandeSpecialRequete.ExecuteNonQuery()
            MessageBox.Show("Materiel Ajoutée...!", "Insertion", MessageBoxButtons.OK, MessageBoxIcon.Information)
            position = 0
            RechargerLesDonnees()
            RafraichirListe()
            BtnAjouterPO.Text = "+"
        Else
            MessageBox.Show("Erreur de saisie...!", "Alerte!", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End If
 
    End Sub

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
 Private Sub RechargerLesDonnees()
        connection.MonJeuDeDonnees.Tables("Toutmateriel").Clear()
        connection.MaRequete = "select idmateriel,nommateriel,prixmateriel,quantiter,reference,numerocategories,nomcategorie from materiel,categoriemateriel where (materiel.numeroCategories=categoriemateriel.NumeroCategorie) "
        connection.MaCommandeSpecialRequete.CommandText = connection.MaRequete
        connection.MonRemplisseur.SelectCommand = connection.MaCommandeSpecialRequete
        connection.MonRemplisseur.Fill(connection.MonJeuDeDonnees, "Toutmateriel")
    End Sub
 
    Public Sub Rafraichir()
        Txtidmateriel.Text = connection.MonJeuDeDonnees.Tables("Toutmateriel").Rows(position).Item(0)
        CbMarque.Text = connection.MonJeuDeDonnees.Tables("Toutmateriel").Rows(position).Item(1)
        txtDesignation.Text = connection.MonJeuDeDonnees.Tables("Toutmateriel").Rows(position).Item(2)
        CbCategorie2.Text = connection.MonJeuDeDonnees.Tables("Toutmateriel").Rows(position).Item(3)
        Cbreference.Text = connection.MonJeuDeDonnees.Tables("Toutmateriel").Rows(position).Item(4)
        TxtTaille2.Text = connection.MonJeuDeDonnees.Tables("Toutmateriel").Rows(position).Item(5)
        TxtPrix.Text = connection.MonJeuDeDonnees.Tables("Toutmateriel").Rows(position).Item(6)
        DgOccasResultat.DataSource = connection.MonJeuDeDonnees.Tables("Toutmateriel")
    End Sub

je vous remercie d'avance de votre aide

[Invité]

Bonjour,
Problème sur la clé étrangère du Insert into.

"d = CbCategorie2.Text.ToString" correspond à numeroCategories de la table Materiel je pense, donc la valeur entrée est-elle bien présente dans la base CatégorieMateriel en tant que clé primaire?

[oshigamie]

comment sa ? il me semble que oui

mes table son comme ceux ci

Materiel

idMateriel
NomMateriel
PrixMateriel
Quantiter
numeroCategories
reference


categoriemateriel

NumeroCategorie
NomCategorie

[Invité]

Vous avez deux tables materiel et categoriemateriel, le lien entre les deux est la clé primaire de categoriemateriel qui est NumeroCategorie avec la clé étrangère dans materiel qui est numeroCategories.

Lors de l'ajout, d'un materiel, le champ "CbCategorie2" doit comporter une valeur qui est déjà dans la table categoriemateriel sur la colonne NumeroCategorie.

Et ceci doit se faire avec le même type, donc normalement un id donc un entier, je vois que le champ d est un String donc une chaine.

Quel est le type des champs categoriemateriel dans vos deux bases?

[oshigamie]

des entiers

mais enfaite je les mis en string parceque dans le champ cbcategori2 (combobox) afficher les differente categorie sous leur non via une requete que javais fait avant

[Invité]

Oui donc la combobox affiche le nom, mais toi tu doit en extraire le numéro associer est pas le nom pour l'entrée dans la table Materiel.
C'est ce que tu fais ici:

Code :

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

d = CbCategorie2.Text.ToString

Donc tu dois ajouter à ta combobox ce numéro de catégorie associer au nom sans l'afficher, pour ensuite le récupérer est le mettre dans d.
Modifie aussi d en Integer est pas String.