| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan eksporteres data fra Access med VBA
    Det er nyttigt at vide, hvordan at eksportere data fra Microsoft Office Access til andre programmer til yderligere manipulation af data. Access er en relationel database management system inkluderet i Microsoft Office-pakken. Visual Basic for Applications ( VBA ) er et Microsoft programmeringssprog der almindeligvis anvendes til at automatisere opgaver i Microsoft Office-programmer . I et par trin, du kan skrive VBA-kode til at eksportere en tabel fra Access til en tekstfil . Instruktioner
    1

    Start Microsoft Office Access 2007, og klik på " Tom database " og derefter klikke på "Opret ". Vælg " Database Tools" og klik på " Visual Basic " . Vælg "Indsæt " menuen og vælg " Modul ".
    2

    Type " Private sub exportAccessData " og tryk " Enter" for at oprette en ny subrutine .
    3 < p> Kopier og indsæt følgende kode i dit nye subrutine til at oprette en ny tabel , føje fire poster til dit bord , og eksportere data fra en tabel til en tekstfil.

    Dim sQLString As String
    < p> sQLString = " CREATE TABLE exportAccessData (CITY TEKST , STATE TEXT )"

    DoCmd.SetWarnings False

    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 = " INSERT INTO exportAccessData VALUES ( ' LOS ANGELES ', ' CALIFORNIEN ' ) "

    DoCmd.RunSQL ( strSQL )
    < p > strSQL = " INSERT INTO exportAccessData VALUES ( ' SAN DIEGO ', ' CALIFORNIEN ' ) "

    DoCmd.RunSQL ( strSQL )

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

    sQLString = sQLString &" FROM exportAccessData "

    sQLString = sQLString &" WHERE ((( exportAccessData.STATE ) = ' CALIFORNIEN ") ), "

    DoCmd . RunSQL ( sQLString )

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

    Styr dit subrutine ved at trykke på < br >

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan oprettes en Login i Visual Basic 
    ·Sådan Code DateDiff i VB.Net 
    ·Sådan slettes et Word dokument med VBA 
    ·Microsoft ASP Certificering 
    ·Hvad er en Mirage driver 
    ·Sådan oprettes et program for at udskrive Beløb i Vis…
    ·Sådan Skift lokal administrator password i VBScript 
    ·Microsoft Word VBA Tutorial 
    ·Sådan eksporterer emner fra ListBox til tekstfiler i V…
    ·VBA Vs . Visual Basic 
      Anbefalede Artikler
    ·Hvordan man laver en PHP Mailing List 
    ·Sådan aktiveres Perl i Snow Leopard 
    ·Sådan får du adgang Update Query Gennem VB 
    ·Monoalphabetic Substitution Ciphers i Java -kode 
    ·Hvordan at skjule din e-mail adresse Brug PHP 
    ·VBScript & SQL Tutorial 
    ·Ideer til Ladder Logic 
    ·Sådan Begrund afsnit med en Tag i HTML 
    ·Update Column attribut er Null i MySQL 
    ·Sådan Test Python 
    Copyright © Computer Viden http://www.computerdk.com