Discussion :

[alexia_78]

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 ???

PS :
J'ai une base de données contenant une table Candidat et un formulaire demandant a l'utilisateur de rentrer des informations sur le candidat.
J'ai crée dans "CandidatTableAdaptater" une requete d'insertion "InsertQuery" mais comment s'en servir dans un formulaire ???

Merci par avance de vos réponses !

Cordialement

Milles excuses si je ne poste pas cette discusion au bonne endroit

Arff personne ne peux m'aider ???

[Faladin]

Commence par lire:

http://plasserre.developpez.com/v6-5.htm
http://plasserre.developpez.com/v6-6.htm

[alexia_78]

Je l'ai lu mais j'ai compris le principe mais pas comment on fait réellement.

Car même en prenant le code présent dans les documents ça marche pas chez moi

[Faladin]

Tiens voilà un bout de code que j'Avais fait à partir de VB2008 sous SQL CE:

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
    Public Shared connectstring As String = "Data Source=C:\.....\Database1.sdf"
    Private Shared connection As New SqlServerCe.SqlCeConnection(connectstring)
 
        '----------------------------
 
    Public Shared Function EnregistrerTable(ByVal nom_table As String)
        Dim flag As Boolean = False
 
        'Ouverture de la connection
        connection.Open()
 
        Try
            'On crée la commande d'update de la table avec le DA
            Dim objetCB = New SqlServerCe.SqlCeCommandBuilder(Tableau.DA)
            Tableau.DA.Update(Tableau.DataSet1, nom_table)
            'Refresh du dataset pour afficher la table modifiée
            Tableau.DataSet1.Clear()
            Tableau.DA.Fill(Tableau.DataSet1, nom_table)
            connection.Close()
            flag = True
        Catch ex As Exception
            MsgBox("Erreur SQL (2002): " + ex.Message.ToString, MsgBoxStyle.Exclamation, "Erreur")
        End Try
 
        Return flag
    End Function

Tableau: Form contenant le DGV
Tableau.DA = DataAdapter