Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come esportare i dati di accesso con VBA

E ' utile sapere come esportare dati da Microsoft Office Access ad altre applicazioni per l'ulteriore manipolazione dei dati . Access è un sistema di gestione di database relazionale incluso nella suite Microsoft Office . Visual Basic, Applications Edition (VBA ) è un linguaggio di programmazione di Microsoft comunemente usato per automatizzare le attività nelle applicazioni di Microsoft Office. In pochi passi è possibile scrivere codice VBA per esportare una tabella da Access in un file di testo . Istruzioni
1

Avviare Microsoft Office Access 2007 e fare clic su " Database vuoto ", quindi fare clic su "Crea ". Selezionare "Strumenti database" e fare clic su " Visual Basic " . Selezionare il menu "Inserisci" e selezionare " Modulo ".
2

tipo "Private sub exportAccessData " e premere " Invio" per creare un nuovo sottoprogramma .
3

Copia e incolla il seguente codice nel nuovo sottoprogramma per creare una nuova tabella , aggiungere quattro record al tuo tavolo , ed esportare i dati da una tabella in un file di testo .

Dim sqlstring Come
String

sqlstring = " CREATE TABLE exportAccessData (CITY TESTO , TESTO DI STATO ) "

DoCmd.SetWarnings False

DoCmd.RunSQL ( SqlString ) per

strSQL = " INSERT INTO exportAccessData VALUES ( ' FORT WORTH ', ' Texas' ) "

DoCmd.RunSQL ( strSQL ) per

strSQL =" INSERT INTO exportAccessData VALUES ( ' ARLINGTON ', ' Texas' ) "

DoCmd.RunSQL ( strSQL ) per

strSQL = " INSERT INTO exportAccessData VALUES ( 'Los Angeles' , 'California ') "

DoCmd.RunSQL ( strSQL ) per

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

DoCmd.RunSQL ( strSQL ) per

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

sqlstring = sqlstring & " FROM exportAccessData "

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

DoCmd . EseguiSQL ( SqlString ) per

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

Eseguire il sottoprogramma premendo

 

Programmazione © www.354353.com