U kunt een bestand met behulp van Visual Basic naar een Microsoft Access 2007- database te koppelen . Access 2007 biedt een nieuw datatype genaamd bijlage die u kunt gebruiken om alle soorten documenten op te slaan in uw database . U kunt bestanden zoals Word-documenten of digitale foto's opslaan . U hoeft geen zorgen te maken over uw database size sinds Access 2007 comprimeert de bestanden automatisch . Een enkel record kan ook overweg met meerdere bijlagen . Instructies
Start Microsoft Access 2007 en maak een tabel met de naam 1 " Tabel1 . " Voeg een veld met de naam "Files " en definieert de "Data Type" als "Bijlage ". Klik op " Database Tools" en selecteer " Visual Basic " op de " Macro" venster . Maak een tekstbestand in " C : \\ " naam " attachThisfile.txt . " Kopen van 2 Maak een nieuwe sub door het intikken van " Sub addAttachments ( ) " en verklaren de volgende variabelen in de sub: < br " Dim db als DAO.Database Dim rst
Zoals DAO.Recordset Dim rstChld
Zoals DAO.Recordset2 Dim fldAttach
Zoals DAO.Field2 " > < br >
Type 3 " Set db = CurrentDb
Set rst = db.OpenRecordset ( " Tabel1 " ) rst.AddNew
" naar een nieuw record toe te voegen aan " Tabel1 . "
Type 4 " Stel rstChld = rst.Fields ( " Bijlagen " ) . Value " om een record variabele kind bepalen . Type
" rstChld.AddNew < br set > fldAttach = rstChld.Fields ( " FileData " ) " om een nieuw veld toe te voegen en om het veld dat binaire gegevens bevat ingesteld
Type 5 . " fldAttach.LoadFromFile " C : \\ attachThisfile.txt " rstChld.Update
" om het bestand dat wordt gehecht te laden en om het record te updaten .
6 Type " rstChld.Close rst.Update
"om het record te sluiten en het actualiseren van de eerste record . Type
" rst.Close End Sub " " om de record set en sluiten "op de laatste rij indien nodig.
< br >
|
