Suche | Statistiken | Benutzerliste | Access-FAQ | Datenschutz Foren
donkarl Forum
donkarl Forum ->  Themen -> Access -> Diskussion ansehen

Du bist als Gast eingelogt. ( Anmelden | Registrieren )
  • Access Stammtisch München am 13.08.2015 (Do)
  • StefanWirrer11.08.15 09:16
  • Trennzeichen geteilete Textdadei verküpfen
  • pwakolbi08.08.15 15:51
       └ RE: Trennzeichen geteilete Textdadei verküpfe... PeterDoering09.08.15 11:58
  • Berichte mit Briefpapier als PDF zusammenführen
  • gutzke06.08.15 10:31
       └ RE: Berichte mit Briefpapier als PDF zusammenfüh... PhilS06.08.15 10:37
          └ RE: Berichte mit Briefpapier als PDF zusammenf... gutzke06.08.15 10:48
             └ RE: Berichte mit Briefpapier als PDF zusamme... StefanWirrer06.08.15 12:48
  • Einladung zum 20. Access-Stammtisch Hannover am 19...
  • KlausWerther29.07.15 11:08
  • Import einer CSV Datei
  • drehorgel24.07.15 09:02
       └ RE: Import einer CSV Datei PeterDoering24.07.15 13:19
  • import beschleunigen
  • Greiff06.07.15 13:45
       └ RE: import beschleunigen PeterDoering08.07.15 01:14
          └ RE: import beschleunigen Greiff23.07.15 22:59
  • Übersichtsmanager
  • horst.kattanek12.07.15 13:32
       └ RE: Übersichtsmanager Karl Donaubauer12.07.15 17:40
  • Kontrollkästchen Aktivieren/deaktivieren
  • pwakolbi09.07.15 18:27
       └ RE: Kontrollkästchen Aktivieren/deaktivieren Karl Donaubauer10.07.15 00:21
          └ RE: Kontrollkästchen Aktivieren/deaktivieren PhilS10.07.15 11:13
             └ RE: Kontrollkästchen Aktivieren/deaktivieren Karl Donaubauer10.07.15 13:06
  • Access Stammtisch München am 9.7.2015 (Do)
  • StefanWirrer07.07.15 09:01
  • alter column
  • manfri02.07.15 11:57
       └ RE: alter column PhilS02.07.15 12:21
  • Suchen eines Datensatzes
  • HQbauer30.06.15 21:26
       └ RE: Suchen eines Datensatzes PhilS01.07.15 09:22
       └ RE: Suchen eines Datensatzes HQbauer01.07.15 21:31
  • Acc2013 Kombinationsfeld Variable
  • squarehead29.06.15 18:27
       └ RE: Acc2013 Kombinationsfeld Variable PhilS29.06.15 19:56
          └ RE: Acc2013 Kombinationsfeld Variable squarehead29.06.15 22:24
             └ RE: Acc2013 Kombinationsfeld Variable PhilS01.07.15 09:09
  • Steuerelement Assistent
  • squarehead20.06.15 16:27
       └ RE: Steuerelement Assistent PeterDoering22.06.15 23:41
          └ RE: Steuerelement Assistent squarehead23.06.15 14:44
  • Access - SQL Problem!
  • SilK9210.06.15 20:38
       └ RE: Access - SQL Problem! PhilS11.06.15 08:57
  • Access Stammtisch München am 11.06.2015 (Do)
  • StefanWirrer09.06.15 14:05
    PeterDoering
    Gesendet: 09.08.15 11:58
    Betreff: RE: Trennzeichen geteilete Textdadei verküpfen



    Extreme Veteran

    Beiträge: 436
    10010010010025
    Hallo,

    pwakolbi - 08.08.15 15:51
    'DoCmd.TransferText acLinkDelim, "", "tmpProdukt", strAktVerz "Produkt.txt", False, ""

    Wofür ich dankbar währe, wenn es eine mögliichkeit gibt die Spezifikation per VBA zu erledigen


    Beispiel:

    Private Function CreateIMEX()
    Dim strSQL As String
    Dim ID As Long

    strSQL = "INSERT INTO MSysIMEXSpecs ( DateDelim, DateFourDigitYear, DateLeadingZeros, DateOrder, DecimalPoint, " & _
    " FieldSeparator, FileType, SpecName, SpecType, StartRow, TextDelim, TimeDelim )" & _
    " VALUES ( '.', -1, -1, 0, '.', '" & vbTab & "', 1252, 'MySpec', 1, 0, '', ':' )"

    CurrentDbC.Execute strSQL , dbFailOnError

    ID = DLookup("SpecID", "MSysIMEXSpecs", "SpecName='MySpec'")

    strSQL = "INSERT INTO MSysIMEXColumns ( [Attributes], [DataType], [FieldName], [IndexType], [SkipColumn], [SpecID], [Start], [Width] ) VALUES ( 0, 10, 'MyText1', 1, 0, " & ID & ", 7, 7 )"
    CurrentDbC.Execute strSQL , dbFailOnError

    strSQL = "INSERT INTO MSysIMEXColumns ( [Attributes], [DataType], [FieldName], [IndexType], [SkipColumn], [SpecID], [Start], [Width] ) VALUES ( 0, 4, 'MyLong1', 0, 0, " & ID & ", 1, 3 )"
    CurrentDbC.Execute strSQL , dbFailOnError

    strSQL = "INSERT INTO MSysIMEXColumns ( [Attributes], [DataType], [FieldName], [IndexType], [SkipColumn], [SpecID], [Start], [Width] ) VALUES ( 0, 8, 'MyDate1', 1, 0, " & ID & ", 25, 11 )"
    CurrentDbC.Execute strSQL , dbFailOnError

    End Function

    Wenn du weitere Feldtypen brauchst, siehe http://www.access-im-unternehmen.de/732 und such nach dbBoolean.

    -----
    Gruss - Peter
    Top of the page Bottom of the page


    Seite: < 24 25 26 27 28 29 ... 30 31 32 33 34 35 36 ... >
    Suche in diesem Forum
    Druckfreundliche Version
    (Alle Cookies von dieser Seite löschen.)