Vous pouvez joindre un fichier à l'aide de Visual Basic à une base de données Microsoft Access 2007. Access 2007 offre un nouveau type de données appelée pièce jointe que vous pouvez utiliser pour stocker tous types de documents dans votre base de données. Vous pouvez stocker des fichiers tels que des documents Word ou des images numériques. Vous n'avez pas à vous soucier de la taille de votre base de données depuis Access 2007 compresse les fichiers automatiquement . Un seul dossier peut également gérer plusieurs pièces jointes . Instructions
1
Démarrez Microsoft Access 2007 et créer une table appelée "Table1 ". Ajouter un champ nommé "Fichiers" et définir le « type de données » comme « pièce jointe ». Cliquez sur " Database Tools " puis sélectionnez " Visual Basic " sur le volet "Macro" . 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 dans le caisson : < br >
"db As DAO.Database
rst As DAO.Recordset
rstChld As DAO.Recordset2
fldAttach As DAO.Field2 " < br >
3 type de
" Set db = CurrentDb
Set rst = db.OpenRecordset ( " Table1 " )
rst.AddNew " pour ajouter un nouvel enregistrement à "Table1 ".
4 Type de
" Set rstChld = rst.Fields ( " Annexes " ) . Value » pour définir une variable d'enregistrements de l'enfant.
type " rstChld.AddNew < br >
Set fldAttach = rstChld.Fields ( " FileData " ) "pour ajouter un nouveau domaine et de définir le champ qui contient des données binaires
5
type . " fldAttach.LoadFromFile "C: \\ attachThisfile.txt "
rstChld.Update
" pour charger le fichier étant attaché et de mettre à jour le dossier.
6
type " rstChld.Close
rst.Update "pour fermer le jeu d'enregistrements et 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.
< br > Photos