Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Zeilenumbruch in Textfeld

Begonnen von Joerg123, Oktober 30, 2014, 19:07:25

⏪ vorheriges - nächstes ⏩

Joerg123

Vorab: ich bin kein Profi in Access
Der Inhalt einer Datei (erstellt mit Notepad, ANSI-Code und typ *.txt) soll mit Zeilenumbruch in einem Textfeld angezeigt werden. In der Datei sind die Zeilenumbrüche vorhanden (&H0D0A).
Das Einlesen der Datei und die Anzeige funktionieren
    Do While Not EOF(1)
       Line Input #1, strSatz
       strDokument = strDokument + strSatz
    Loop
    Me.Text81.Value = strDokument

Problem: Zeilenumbrüche werden ignoriert. Selbst das Hinzufügen beim Einlesen bringt keine Zeilenumbrüche.
      strDokument = strDokument + strSatz & &H0D0A
      bzw.
      strDokument = strDokument + strSatz +CHR(13) +CHR(10)
Wo liegt der Fehler ? Hat jemand eine Idee ?

MzKlMu

Hallo,
eigentlich müsste das mit Chr(13) ... klappen.
Du kannst es auch mal so versuchen:
strDokument = strDokument + strSatz +  vbCrLf
Gruß Klaus

MaggieMay

Hallo,

du liest die Datei zeilenweise ein, also musst du die Zeilenumbrüche access-konform wieder hinzufügen.
So könnte das aussehen:    Do While Not EOF(1)
       Line Input #1, strSatz
       strDokument = strDokument & strSatz & vbCrLf
    Loop
    Me.Text81.Value = strDokument
Freundliche Grüße
MaggieMay

Joerg123

Danke an euch beiden. Es funktionieren beide Lösungen !!

Reinhard

Hallo !
Seid ihr zu diesem Thema noch da ?
Ich bin mit VBA nicht sehr vertraut. Gehtdas auch im Abragegentwurf ???? bzw. im Textfeld der Tabelle?
Danke,
Reinhard

Knobbi38

Hallo Reinhard,

Zitat von: Reinhard am Dezember 20, 2024, 14:23:37Seid ihr zu diesem Thema noch da ?
Nein, denn das Thema ist gelöst und lange abgeschlossen. Es ist auch kein guter Stil, den Thread eines anderen zu kapern, deshalb die Empfehlung, einen eigenen, neuen Thread zu erstellen, in dem du dein Problem mit deinen eigenen Worten schilderst.