Access import

[vatandas]

Hallo,

ich möchte csv Datein( gtrennt mit ; oder auch tabs) aus VB6 in eine Access datenbank importieren. Kann mir da jemand einen tipp geben?
Bin für jeden tipp dankbar, suche seit längerem vergeblich danach.

danke schonmal

 

[Alex F.]

Es gibt die TransferText methode wenn du ein Objekt der Access datenbank hast mit der kannst du das machen allerdings brauchst du dann auch eine Importspezifiktation weil der normale Textimport bei access tab erwartet

Grüsse bb

 

[vatandas]

hmmm hast du auch ein kleines beispiel für mich? Wäre sehr nett. Aber trotzdem Danke für deine Antwort.

 

[Alex F.]

erstellt eine spezifikation :

    sql = "Insert into MSysIMEXSpecs (DateDelim, DateFourDigitYear, DateLeadingZeros, DateOrder, " & _
          " DecimalPoint, FieldSeparator, FileType, SpecName, SpecType, StartRow, TextDelim, TimeDelim )" & _
          " VALUES " & _
          " ( '.' ,-1,0,0, ',' ,';', 850, '" & Name & "', 1, 1, '',':') "

    Call Mdb.Execute(sql)

Die erste eins hinter Name muss eine 0 sein wenn kein header in der csv ist

Dim x As Access.Application
        x.DoCmd.TransferText(acImportDelim, "NAME DER SPEZIFIKATIO", "NAME DER ZIELTABELLE", "DATEINAME", TRUE wenn die erste Zeilespalten enthält)

Grüsse bb