Comment intégrer un fichier dans une base de données Access utilisant Visual Basic

Instructions

1. Démarrez Microsoft Access 2007 et de créer une table appelée "Tableau 1." Ajouter un champ nommé "Fichiers" et définir la "Type de données" comme "Pièce jointe." Cliquer sur "Base de données Outils" et sélectionnez "Visual Basic" sur "Macro" volet. Créez un fichier texte dans "C:" nommé "attachThisfile.txt."

2. Créer un nouveau sous en tapant "AddAttachments sub ()" et de déclarer les variables suivantes à l'intérieur de la sous:

   "Dim db Comme DAO.Database

   Dim premier Comme DAO.Recordset

   Dim rstChld Comme DAO.Recordset2

   
   
   
   

   Dim fldAttach Comme DAO.Field2"

3. Type "Set db = CurrentDb

   Set rst = db.OpenRecordset ("Tableau 1")

   rst.AddNew" pour ajouter un nouvel enregistrement à "Tableau 1."

4. Type "Réglez rstChld = rst.Fields ("Pièces jointes") .Value" pour définir une variable d'enregistrements de l'enfant.

   Type "rstChld.AddNew

   
   
   
   

   Réglez fldAttach = rstChld.Fields ("FileData")" pour ajouter un nouveau domaine et de définir le champ qui contient les données binaires.

5. Type "fldAttach.LoadFromFile "C: attachThisfile.txt"

   rstChld.Update" de charger le fichier étant ci-joint et de mettre à jour le dossier.

6. Type "rstChld.Close

   rst.Update" de fermer le jeu d'enregistrements et de mettre à jour le premier jeu d'enregistrements.

   Type "rst.Close" pour fermer le jeu d'enregistrements et "End Sub" sur la dernière ligne si nécessaire.