Discussion :

[destin kass]

Bonjour à tous !!!!
J'ai un problème avec une base de données access connectée à une application vb.Net.

la table sur laquelle je travaille est une table fils qui doit recevoir la clé étrangère de la table père.
Au faite, il s'agit d'une petite application concernant une gestion de naissance à une maternité.
Dans cette table fils j'ai 7 champs:

1. id_enfant : qui est une valeur auto
2. id_maman : qui es une clé étrangère venant de la table t_maman ces id_maman sont rangés dans un check box dans la table t_enfant
3. nom_enfant
4. post_nom
5. prenom
6. sexe : doit recevoir une valeur booléenne et donc ça ce trouve aussi dans un check box et l'utilisateur doit entrer soit M ou F.
7. date_naiss : le champs date qui est de format date/time ici l'utilisateur doit choisir une date dans un DateTimePick.

Mon problème se situe à ce niveau quand j'entre les enregistrements vers la base de données en revenant côtés vb. Les enregistrements se trouvent dans le DataGridView mais si j'entre ces enregistrements côté vb l'ID m'envoie un message "type de données incompatible dans l'expression du critère " Voici le code pour mon bouton ajouter :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim d As New naissance()
d.connexion.Open()
d.cmd.CommandText="INSERT INTO t_child(ID_maman,nom,post_nom,prenom,sexe,date_naiss) VALUES(@ID_maman,@nom, @post_nom,@prenom, @sexe, @date_naiss)"
d.cmd.Parameters.AddWithValue("@ID_maman",Me.ComboBoxIDM.Text) 
d.cmd.Paramaters.AddWithValue("@nom",Me. txtNom.Text) 
d.cmd.Parameters.AddWithValue("@post_nom",Me.Textboxnom.Text) 
d.cmd.Parameters.AddWithValue("@prenom",Me.txtp.Text)
d.cmd.Parameters.AddWithValue("@sexe",Me.ComboBoxsexe.Text) 
d.cmd.Parameters.AddWithValue("@date_naiss",ComboBoxdate.Text) 
d.cmd.Parameters.AddWithValue("@ID_enfant",Me.Txtidenf.Text) 
d.cmd.ExecuteNonQuery()
d.connexion.Close()
MessageBox.Show("Enfant Bien Enregistré","Add",MessageBox. Buttons. OK, MessageboxIcon.Information)
d. remplirDataGridVieuw("SELECT * FROM t_child",DataGridVieuw_Enfant)

Quelqu'un peut m'aider svp...

J'ai l'impression que ces les deux champs entre autre le sexe qui doit recevoir une valeur booléenne et le format de la date qui font défaut.
Espérant à votre aide je tiens à vous informer que je suis encore débutant....
Je ne sais pas si je fournis toutes les informations nécessaires pour mériter votre aide s'il y'a un soucis n'hésiter pas à m'informer.
Merci d'avancer.

[Sankasssss]

Bonjour,

Le paramètre ajouté avec AddWithValue :

Code :

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

d.cmd.Parameters.AddWithValue("@ID_maman",Me.ComboBoxIDM.Text)

Doit être du même type que la base de donnée. Dans ce cas-ci vous donné toujours un paramètre de type String car c'est ce que renvoie la propriété Test des contrôles.
Si le paramètre ID_maman est de type Integer, il vous faut faire le cast suivant :

Code :

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

d.cmd.Parameters.AddWithValue("@ID_maman",CInt(Me.ComboBoxIDM.Text))

[destin kass]

Merci pour votre intervention bien sûr que oui Mon parametre ID_maman est de type intiger depuis ma base de données. J veux essayer ce que vous me dites pour voir si ça va marcher aussi pour formater la date avec access j'ai une DateTimePick où j dois sélectionner une date et l'afficher dans mon DataGridVieuw. Je fais comment svp. Quel code que je peux mettre derrière le DateTimePick ou même derrière mon bouton ajouter pour que ma date soit prise en charge. Merci d'avance....