Bonjour,
Je veux savoir svp comment exécuter une requête d’insertion ou Update dans une base de données Access en utilisant ADO, j’ai ‘‘réussi’’ à exécuter la requête Select, mais pas une requête de mise à jour, grâce au code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
   Dim strQ as String
   StrQ = “Select * from table”
   Dim con As ADODB.Connection
    Set con = New ADODB.Connection
    con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db.mdb"
    con.Open
 
    Dim rs As ADODB.Recordset
    Set rs = New ADODB.Recordset
 
    rs.Open strQ, con, adOpenDynamic
Merci d’avance.