Upload og download af filer til access database

Jeg benytter følgende visual basic kode til at gemme f.eks et worddokument i en access database (2007):


    Dim db As DAO.Database
    Dim rst As DAO.Recordset
    Dim rstChld As DAO.Recordset2
    Dim fldAttach As DAO.Field2
   
    Set db = CurrentDb
    Set rst = db.OpenRecordset("tabFiler")
    rst.AddNew
   
        Set rstChld = rst.Fields("Fil").Value
       
        rstChld.AddNew
            Set fldAttach = rstChld.Fields("FileData")
            fldAttach.LoadFromFile Fil
        rstChld.Update
        rstChld.Close
       
    rst.Update
    rst.Close


Jeg vil imidlertid gerne have fat i filen igen i forbindelse med afsendelse af e-mails fra databasen. Hertil benytter jeg følgende kode:

    Set oLook = CreateObject("Outlook.Application")
    Set oMail = oLook.createitem(0)
   
    Set rsf = CurrentDb.OpenRecordset("SELECT * FROM tabFiler" + " WHERE " + "Nr=" + CStr(600))
    Fil = rsd!Fil
    With oMail
        .To = Til
        .body = Tekst
        .Subject = Emne
        .Attachments.Add (Fil)
        .Send
    End With

Jeg har derfor brug for at få fat i filen igen i sætningen .Attachments.Add (Fil)

mvh