Você pode anexar um arquivo usando o Visual Basic para um banco de dados Microsoft Access 2007. Access 2007 oferece um novo tipo de dados chamado anexo que você pode usar para armazenar todos os tipos de documentos em seu banco de dados . Você pode armazenar arquivos, como documentos do Word ou imagens digitais. Você não tem que se preocupar com o tamanho do banco de dados Access 2007 , uma vez comprime os arquivos automaticamente. Um único registro também pode lidar com vários anexos . Instruções
1

Inicie o Microsoft Access 2007 e criar uma tabela chamada " Tabela 1 ". Adicionar um campo chamado " Arquivos" e definir o " tipo de dados ", como "Anexo ". Clique em "Ferramentas de banco de dados " e selecione " Visual Basic " no painel "Macro" . Crie um arquivo de texto em "C: \\ " chamado " . AttachThisfile.txt "
2

Crie uma nova sub digitando " addAttachments Sub ( )" e declarar as seguintes variáveis ​​dentro do sub: < br >

" Dim db As DAO.Database

Dim rst Como DAO.Recordset

Dim rstChld Como DAO.Recordset2

Dim fldAttach Como DAO.Field2 " < br >
3 Tipo

"Set db = CurrentDb

Set rst = DB.OpenRecordSet ( " Tabela 1 " )

rst.AddNew " para adicionar um novo registro " Tabela 1 ".
4 Tipo

" Set rstChld = rst.Fields (" Anexos "). Valor " para definir uma variável de registros filho.

Type " rstChld.AddNew < br > definir

fldAttach = rstChld.Fields ( " FileData " ) fldAttach.LoadFromFile "C" para adicionar um novo campo e para definir o campo que contém dados binários
5

Type. " : \\ attachThisfile.txt "

rstChld.Update " para carregar o arquivo que está sendo ligado e para atualizar o registro .
6 Tipo

" rstChld.Close

rst.Update "para fechar o conjunto de registros e atualizar o primeiro conjunto de registros .

Type" rst.Close "para fechar o conjunto de registros e" End Sub " na última linha , se necessário.
< br >