Textdatei zur Mail - Automatisierung erzeugen

[Grummelbaer]

Hallo zusammen,

ich wünsche allen noch ein gutes neues Jahr ( auch wenn nun schon wieder ein paar Tage herum sind ).

Ich hätte da mal wieder eine Frage.

Ich möchte per per VBA eine Textdatei erzeugen, um über unser Mail - System ( nicht Outlook ) automatisiert Fehlermeldungen
zu versenden.

Die Datei muss in einem bestimmten Verzeichnis stehen und außer der Fehlermeldung diverse Steuerbefehle enthalten.

Das erzeugen der Datei klappt auch mit folgendem Code:

Code [Auswählen] Erweitern

Dim strDateinameImport As String

strDateinameImport = "Z:\import\Importfehler.txt"

Open strDateinameImport For Output As #1

    Write #1, "@@EMAIL"
    Write #1, "@@NUMMER admin@testserver.de"
    Write #1, "@@BETREFF Importfehler"
    Write #1, "es klappt nicht"
   
Close #1

Das Ergebnis sieht dann allerdings so aus:

"@@EMAIL"
"@@NUMMER admin@testserver.de"
"@@BETREFF Importfehler"
"es klappt nicht"

Das Problem dabei ist, dass die Anführungszeichen in der Datei nicht auftauchen dürfen.

Ich habe versucht diese im Editor wegzulassen, aber dann meckert Access dass sofort an.

Auch der Versuch die Strings in eine Variable zu packen ist fehlgeschlagen.

Hat da vielleicht jemand eine Rat für mich ?

Gruß aus der Pfalz

Jürgen

[Grummelbaer]

Hallo zusammen.

hat sich erledigt.

Wenn man print statt write verwendet funktioniert das ganze.

Gruß Jürgen