Sie können eine Datei anhängen mit Visual Basic auf eine Microsoft Access 2007-Datenbank . Access 2007 bietet einen neuen Datentyp namens Anhänge , die Sie verwenden können, um alle Arten von Dokumenten in der Datenbank speichern . Sie können Dateien wie Word-Dokumente oder digitale Bilder . Sie müssen sich keine Gedanken über die Größe der Datenbank zu sorgen, da Access 2007 komprimiert die Dateien automatisch . Ein einzelner Datensatz kann auch mit mehreren Anhängen . Anleitung
1

Starten Sie Microsoft Access 2007 , und erstellen Sie eine Tabelle namens "Tabelle1 ". Fügen Sie ein Feld mit dem Namen " Files" und definieren Sie den "Data Type" als "Anhang ". Klicken Sie auf " Database Tools " und wählen Sie " Visual Basic " auf " Makro " angezeigt. Erstellen Sie eine Textdatei in "C: \\ " mit dem Namen " attachThisfile.txt . "
2

Erstellen Sie eine neue Sub durch Eingabe von " Sub addAttachments ()" und erklären die folgenden Variablen innerhalb der sub:

" Dim db Wie DAO.Database

Dim rst als DAO.Recordset

Dim rstChld Wie DAO.Recordset2

Dim fldAttach Wie DAO.Field2 "

3

Typ " Set db = CurrentDb

Set rst = db.OpenRecordset ( " Tabelle1 " )

rst.AddNew " , um einen neuen Datensatz hinzufügen "Tabelle1 ".
4

Typ " Set rstChld = rst.Fields ( " Attachments " ) . Value" ein Kind Cord Variable zu definieren .

Type " rstChld.AddNew

Set fldAttach = rstChld.Fields ( " FileData " ) ", um ein neues Feld hinzuzufügen und um das Feld , die binäre Daten enthält gesetzt
5

Typ . " fldAttach.LoadFromFile "C: \\ attachThisfile.txt "

rstChld.Update " , um die Datei zu laden und angebracht ist , um den Datensatz zu aktualisieren.
6

Type " rstChld.Close

rst.Update ", um das Recordset und aktualisieren Sie die erste Cord .

Type" rst.Close End Sub " in der letzten Zeile " , um das Recordset und schließen " , wenn nötig.