Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como exportar dados de acesso com VBA
É útil saber como exportar dados do Microsoft Office Access para outras aplicações para além da manipulação de dados. Access é um sistema de gerenciamento de banco de dados relacional incluídos na suíte Microsoft Office. Visual Basic for Applications (VBA) é uma linguagem de programação Microsoft comumente usado para automatizar tarefas em aplicativos do Microsoft Office . Em poucos passos você pode escrever código VBA para exportar uma tabela do Access para um arquivo de texto . Instruções
1

Inicie o Microsoft Office Access 2007 e clique em " Banco de Dados em Branco " , em seguida, clique em "Criar ". Selecione "Ferramentas de Banco de Dados " e clique em " Visual Basic" . Selecione o menu "Inserir" e selecione " Module ".
2

Type " Private Sub exportAccessData " e pressione " Enter" para criar uma nova sub-rotina.
3

Copie e cole o seguinte código em sua nova sub-rotina para criar uma nova tabela, adicionar quatro registros para a sua mesa , e exportar dados de uma tabela para um arquivo de texto.

Dim SQLString as String

SQLString = " CREATE TABLE exportAccessData (CITY texto, texto ESTADO )"

DoCmd.SetWarnings Falso

DoCmd.RunSQL ( SQLString )

strsql = " INSERT INTO exportAccessData VALUES (' FORT WORTH ', ' TEXAS ' ) "

DoCmd.RunSQL ( strsql )

strsql =" INSERT INTO exportAccessData VALUES (' ARLINGTON ', ' TEXAS ') "

DoCmd.RunSQL ( strsql )

strsql = " VALUES INSERT INTO exportAccessData ( ' LOS ANGELES ', ' California' ) "

DoCmd.RunSQL ( strsql )

strsql = " INSERT INTO VALUES exportAccessData ( ' SAN DIEGO ', ' California' ) "

DoCmd.RunSQL ( strsql )

SQLString = "SELECT exportAccessData.CITY , exportAccessData.STATE INTO dataToExport "

SQLString = SQLString & " FROM exportAccessData "

SQLString = SQLString &" WHERE ( ( ( exportAccessData.STATE ) = ' CALIFORNIA ')); "

DoCmd. RunSQL ( SQLString )

DoCmd.OutputTo acOutputTable ", dataToExport " , acFormatTXT , "c: \\ dataToExport.txt " . " F5"
4

Execute sua rotina pressionando < br >

Anterior :

Próximo : No
  Os artigos relacionados
·Como abrir arquivos XLS em um formulário em VBA 
·Como criar menu de navegação em VB.NET 
·Como empacotar VB.NET Projeto 
·Como devolver um valor em uma coluna multi Listbox 
·Como Criar Pivot Table Com VBA 
·Como usar a caixa de preenchimento automático em WPF 
·Como criar um ícone no desktop durante a instalação …
·Como adicionar Web Services eBay em VB.NET 
·Definição de campo no Visual Basic 6.0 
·Como usar VB Lite 
  Artigos em destaque
·Como link COBOL e C juntos no z /OS 
·Como executar um aplicativo Clojure na JVM e CLR 
·Como fazer upload de imagens em JSP 
·Como criar uma macro Lisp 
·A codificação Java para a soma de dois números 
·Como instalar um fornecedor Java Application 
·Visual Basic 6 Passo-a- Passo 
·Como converter um número para um personagem usando C +…
·Diferença entre Vector & Lista em C + + 
·Como compilar em TextPad 5 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados