Gestion des pièces jointes d'une BD Access en ADODB

Question

Bonjour,

Je code en ce moment une interface sous Excel qui utilise des UserForms. A partir de ces UserForms je me connecte à ma base de données (Access) pour ajouter, supprimer, modifier des enregistrements des tables

Cependant je voudrais savoir si c'est possible de réaliser cette opération en utiliser que du ADODB et non du DAO

Code:
(au sein d'un UserForms Excel)

Private Sub CmdAjouter_Click()
    Dim db As DAO.Database
    Dim res As DAO.Recordset
    Dim sql As String, chemin as String
    
    chemin = "c:\.....\piece_jointe.txt"
    sql "select Rapport from ETUDE where NumEtude 10;"

    Set db = OpenDatabase(source)      'dans source se situe l'adresse de la base "c:\......\mabase.accdb"
    Set res = db.OpenRecordset(sql)
    
        res.Edit
            With res.Fields("Rapport").Value   'Rapport est le nom du champs pièces jointes
                .AddNew
                .Fields("FileData").LoadFromFile chemin                
                .Update
            End With
        res.Update
End Sub

Ce petit passage de code est réalisable en ADODB ? J'ai regardé dans l'explorateur d'objet mais j'ai vu que recordset2 n'existe pas en ADODB...:( 

Merci d'avance!!!

4u4me4us · Answer

Va voir sur ce forum bien que VB6 je pense (j&#8217;espère) qu'il fonctionnera.

http://www.timesheetsmts.com/adotutorial.htm

Sharkyos · Answer

Merci pour ta réponse, j'y ai jeté un coups d'oeil mais sans succès.
Apparement, faire un recordset d'un recordset n'est pas possible en ADODB si j'ai bien compris...? (d'après la doc)

Si quelqu'un a une autre solution je suis preneur!

Merci d'avance!

Gestion des pièces jointes d'une BD Access en ADODB

2 réponses

Votre réponse

Discussions similaires