Discussion :

[sidisadmir]

bonjour
s.v.p si quelqu'un peut m'aider à comprendre comment modifier ,supprimer ou ajouter des enregestrements dans une base de données access avec ado.net
sachant que que la base contient trois tables A,B,C liées entre elles.
je voudrais utiliser une requette du genre "select a.champs1,b.champs1,b.champs2,c.champs1 from A inner join etc..."
s.v.p aidez moi à comprendre la methode à utiliser pour editer ces tables A,B,C en utilisant ado.net.
merçi

[bluekat]

Exemple de code pour la lecture :

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 con As New OleDb.OleDbConnection
            Dim cmd As New OleDb.OleDbCommand
            Dim dr As OleDbDataReader
            con.ConnectionString = ModuleGeneral.cheminBDD
            con.Open()
            cmd = New OleDbCommand("select * from Localite", con)
            dr = cmd.ExecuteReader
            listeLocalite.Clear()
            While dr.Read()
                Dim denom As String = dr("Denomination")
                denom = ModuleGeneral.ApostropheLecture(denom)
                listeLocalite.Add(New Localite(dr("ID_Localite"), dr("ID_Pays"), dr("CP"), denom))
            End While
            con.Close()

Voici quelques requetes en vrac ;

Code :

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

1
2
Dim query As String = "insert into Localite(ID_Pays,Denomination,CP) values(" & IDPays & ",'" & Denomination & "'," & CP & ")"
            cmd = New OleDbCommand(query, con)

executescalar car recupère une valeur précise (exemple : 3)

Code :

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

1
2
Dim query As String = "insert into Localite(ID_Pays,Denomination,CP) values(" & IDPays & ",'" & Denomination & "'," & CP & ")"
            cmd = New OleDbCommand(query, con)

Code :

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

1
2
cmd = New OleDbCommand("UPDATE Localite SET Denomination = '" & Denomination & "', ID_Pays = " & IDPays & ", CP = " & CP & " WHERE ID_Localite = " & ID, con)
            cmd.ExecuteNonQuery()

Code :

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

1
2
cmd = New OleDbCommand("Delete FROM Localite Where ID_Localite =" & ID, con)
            cmd.ExecuteNonQuery()

Et il va falloir importer Imports System.Data.OleDb

J'espère que ça t'aide un peu. En ce qui concerne les requetes sur plusieurs tables je n'ai pas encore fait. mais peut-être faut-il refaire une requete dans le while dr.read() ?

[WOLO Laurent]

Pour rendre votre programme plus paramétrable, il faut utiliser les fichier de configuration.