Comment inserer des données dans un dataset ?

Question

Bonjour,

Actuellement je developpe une petite application sous VB express Edition avec une connexion avec une base de données SQL Server Express Edition.

Or vu que je suis une utilisatrice novice de VB, je ne sais pas comment inserer des données qui se trouvent dans un formulaire, dans une table de la base de données réprésentée par la dataset ?

Pourriez vous m'aider ???

Merci par avance de vos réponses !

Cordialement

Alexia178 · Answer

J'ai crée dans "CandidatTableAdaptater" une requete d'insertion "InsertQuery" mais comment s'en servir dans un formulaire ???

gillardg · Answer

par drag and drop

Alexia178 · Answer

Comment ça ?

Car j'ai deja essayé et ça me met un truc du genre :
Microsoft.VSDesigner.DataSource.Control.TableRowData    InsertQuery (.......

Et Microsoft.VSDesigner et InsertQuery pose probleme :(

gillardg · Answer

dans la fenètre DatSources,
tu as ton dataSet, 'TestDataSet' pour l'exemple
c'est un Treeview avec des Child 
chacun des Child est un objet que tu peux poser sur ta feuille 


si tu veux une copie écran je te l'envoie par @mail

Alexia178 · Answer

Ok je viens de voir 

Mais ça me donne comme commande :
"Me.CandidatTableAdapter.Fill(Me.TestDataSet.Candidat)"

Or si je veux que toutes les informations saisies dans différents box (nom, prenom, etc ...) s'insere dans la table une fois qu'on appuie sur un bouton de validation,
comment je dois modifier la commande précédente ?

Alexia178 · Answer

Donc ça ne sers a rien de créer une requête InsertQuery (car elle n'apparait pas dans l'arborescent de la source de données) ???

gillardg · Answer

Private





Sub

 Button1_Click(


ByVal

 sender 


As

 System.Object, 


ByVal

 e 


As

 System.EventArgs) 


Handles

 Button1.Click



Me

.ContactsTableAdapter.Fill(


Me

.TestDataSet.contacts)



End





Sub

Alexia178 · Answer

:( Ca marche pas :(

Car il ne l'ajoute pas dans la base de données

gillardg · Answer

Me

.Validate()



Me

.ContactsBindingSource.EndEdit()



Me

.ContactsTableAdapter.Update(


Me

.TestDataSet.contacts)

Alexia178 · Answer

Voila mon code : " Public Class AjoutCandidat Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If Nom.Text <> Nothing And Prenom.Text <> Nothing And Telephone.Text <> Nothing And Email.Text <> Nothing And Suivi.Text <> Nothing Then Dim chaine As String chaine = Suivi.SelectedItem MsgBox("Candidat ajoutée " + Prenom.Text + " " + Nom.Text + " avec comme suivi : " + chaine) Me.Close() Else MsgBox("Vérifier que toutes les informations sont rentrées") End If End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Close() 'Annulation End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Dim id As Integer id = 3 Me.CandidatTableAdapter.Fill(Me.MaquetteDataSet.Candidat) id = id + 1 End Sub End Class " et la table candidat contient les champs suivant (id, prénom, nom, Téléphone, Email, Compétence, Date, Suivi, Commentaires) Et je voudrais que une fois qu'on appuye sur le bouton, hop ça rentre les données saisies dans Nom.Text, Prenom.Text, ... dans la table Candidat !

gillardg · Answer

Me

..CandidatTableAdapter.Update( Me.MaquetteDataSet.Candidat)

Alexia178 · Answer

"Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Dim id As Integer

        id = 2
        Me.CandidatTableAdapter.InsertQuery(id + 1, Prenom.Text, Nom.Text, Telephone.Text, Email.Text, Competence.Text, Date.Now, Suivi.Text, Commentaire.Text)
        Me.CandidatTableAdapter.Fill(Me.MaquetteDataSet.Candidat)
        Me.Validate()
        Me.CandidatBindingSource.EndEdit()
        Me.CandidatTableAdapter.Update(Me.MaquetteDataSet.Candidat)
     
    End Sub"

En faisant ça j'arrive a ajouter dans la table mais qu'une seul fois (il me dit qu'il y a un probleme de clé primaire, or j'ajoute bien 1 a chaque fois) , mais quand je quitte l'application, ça ne le garde, car quand j'affiche les valeurs de la table candidats dans l'arborescence j'ai que les valeurs d'origine.

J'en ai marre je comprend plus rien

gillardg · Answer

heu si tu lance ton appli depuis IDE de vb , et queue tu utilises un fichier .MDf 
comme bd et que ce fichier est copié à chaque fois que tu lance l'appli , il est normal queue tes changements soient perdus

Alexia178 · Answer

Ok donc il faut que j'annule l'option copier a chaque fois le fichier ?

gillardg · Answer

non si ton prog est fini il faut le lancer mais depuis l'explorer
et met l'option 'copyr if newer'

gillardg · Answer

mais si c'est pour distribuer ta base de donnée il faudra pas oublier de distribuer le bon fichier

Alexia178 · Answer

Ok merci pour tout

gillardg · Answer

deux reins(de rien)

Alexia178 · Answer

Au fait il y a t'il un moyen de garder les changements dans la base de données en utilisant IDE de vb ?

Et comment utiliser une application VB dans Explorer ?

gillardg · Answer

1 oui =>met l'option 'copy if newer'
2 ton appli.exe vb la stocke sur le disque dur ( si, si , cex vrai)

Comment inserer des données dans un dataset ?

22 réponses

Votre réponse

Discussions similaires