Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Juno am Oktober 22, 2010, 16:12:27

Titel: testdatei erstellen
Beitrag von: Juno am Oktober 22, 2010, 16:12:27
Hallo zusammen,

wie kann ich eine textdatei in folgendem Format erstellen:

Feldname, Feldinhalt
Feldname1, Feldinhalt1
Feldname2, Feldinhalt2

Die Datei soll immer nur für den aktuell ausgewählten Datensatz erstellt werden.
Titel: Re: testdatei erstellen
Beitrag von: DF6GL am Oktober 22, 2010, 17:42:33
Hallo,


schau mal in die VBA-Hilfe unter "Print #-Anweisung "
Titel: Re: testdatei erstellen
Beitrag von: Juno am Oktober 25, 2010, 08:37:09
Ich arbeite jetzt mit write. Also so:

Dim strDateiname As String

strDateiname = "E:\...\test.txt"
    Open strDateiname For Output As #1

    Write #1, "Name", [Feldinhalt] & _
              "Name2", [Feldinhalt2]

    Close #1


Das funktioniert auch soweit. Aber wie funktioniert das mit einem Zeilenumbruch? Wie kann ich zwischen Zeile 1 und Zeile 2 einen Zeilenumbruch bewirken?
Titel: Re: testdatei erstellen
Beitrag von: MzKlMu am Oktober 25, 2010, 09:12:27
Hallo,
versuche es so:
Write #1, "Name", [Feldinhalt]
Write #1, "Name2", [Feldinhalt2]

Write hängt automatisch eien Zeilenumbruch an. Nach jeder Zeile. Du machst aber mit der Verkettung (&) ein Feld aus den Feldern, demzuzufolge erhältst Du auch nur eine Zeile.
Titel: Re: testdatei erstellen
Beitrag von: Juno am Oktober 25, 2010, 09:28:38
So funktionierts :) Danke.
Titel: Re: testdatei erstellen
Beitrag von: Juno am Oktober 25, 2010, 09:58:54
Und wie kann ich das einstellen, dass dort nicht #Null# sondern nichts erscheint?
Und das Datumsformat müsste so dargestellt werden: YYYYMMDDhhmmss (20090201121500)
Titel: Re: testdatei erstellen
Beitrag von: DF6GL am Oktober 25, 2010, 14:42:59
Hallo,

Write #1, "Name", nz([Feldinhalt],"")
Write #1, "IrgendeinDatum", Format([Datumsfeld], "yyyymmddhhmmss")
Titel: Re: testdatei erstellen
Beitrag von: Juno am Oktober 25, 2010, 15:57:32
Danke. ;D ;D