Datamaskin
  | Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringsspråk
  • Delphi Programming
  • Java Programming
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl Programming
  • Python Programming
  • Ruby Programming
  • Visual Basics Programming
  •  
    Datamaskin >> Programmering >> Visual Basics Programming >> Content
    Slik eksporterer Access Data Med VBA
    Det er nyttig å vite hvordan å eksportere data fra Microsoft Office Access til andre applikasjoner for videre manipulering av data . Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. Visual Basic for Applications ( VBA ) er en Microsoft programmeringsspråk som vanligvis brukes til å automatisere oppgaver i Microsoft Office-programmer . I noen få trinn kan du skrive VBA -kode for å eksportere en tabell fra Access til en tekstfil . Instruksjoner
    en

    start Microsoft Office Access 2007 og klikk "Blank Database " klikk " Opprett". Velg "Database Verktøy" og klikk " Visual Basic" . Velg " Insert"-menyen og velg " Module ".
    2

    Type " Private sub exportAccessData " og trykk " Enter" for å opprette en ny subrutine .
    3 < p > Kopier og lim inn følgende kode inn i den nye subrutine for å lage en ny tabell , legge til fire poster til bordet ditt , og eksportere data fra en tabell til en tekstfil .

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

    DoCmd.SetWarnings False

    DoCmd.RunSQL ( sQLString )

    strsql = " INSERT INTO exportAccessData VERDIER ( FORT VERDT ',' TEXAS ' ) "

    DoCmd.RunSQL ( strsql )

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

    DoCmd.RunSQL ( strsql )

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

    DoCmd.RunSQL ( strsql )
    < p > strsql = " INSERT INTO exportAccessData VALUES (' 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

    Kjør subrutine ved å trykke

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan skrive en ActiveX-kontroll 
    ·Slik Send en e-postvedlegg i Vb.Net 
    ·Hvordan koble til en URL Med VBS 
    ·Slik konverterer Excel til Access 
    ·VBA Å 
    ·Hvordan beregne vanlig rente i Visual Basic 
    ·Hvordan sette etiketter eller linjenummer i Visual Basi…
    ·Hvordan koble Video i VB.NET 
    ·Visual Basic: Hvordan sette et bilde Array til et bilde…
    ·Hvordan lage sikkerhetsprogramvare i VB.Net 
      Anbefalte artikler
    ·Hvordan skrive et program som vil Refresh Explorer 
    ·Hvordan bruke C Arrays i C + + 
    ·Hvordan programmere en e- Spider i Python 
    ·Slik importerer GTK Python 
    ·MySQL Venstre Bli Tutorial 
    ·Hva er de JMS Objekter som er innhentet via JNDI 
    ·Hvordan bruke Checkbox i GridView 
    ·Hvordan legge til to tall Bruke PHP 
    ·Hvor å Feilfri en Inndatabuffer i C + + 
    ·Kode Typer for CC i Java 
    Copyright ©  Datamaskin  http://www.datamaskin.biz/