OpenTextFile-Methode
Öffnet eine angegebene Datei und gibt ein TextStream-Objekt zurück, das zum Lesen aus, Schreiben in oder Anfügen an die Datei verwendet werden kann.
Syntax
-Objekt.OpenTextFile (dateiname, [ iomode, [ create, [ format ]]])
Die Methode OpenTextFile hat folgende Teile:
Bestandteil | Beschreibung |
---|---|
Objekt | Erforderlich. Immer der Name eines FileSystemObject. |
Dateiname | Erforderlich. Zeichenfolgenausdruck, der die zu öffnende Datei angibt. |
iomode | Optional. Gibt den Eingabe-/Ausgabemodus an. Kann eine von drei Konstanten sein: ForReading, ForWriting oder ForAppending. |
create | Optional. Boolescher Wert, der angibt, ob eine neue Datei erstellt werden kann, wenn der angegebene Dateiname nicht vorhanden ist. Der Wert ist True , wenn eine neue Datei erstellt wird. False , wenn es nicht erstellt wurde. Der Standardwert ist False. |
format | Optional. Einer von drei Tristate-Werten, die verwendet werden, um das Format der geöffneten Date anzugeben. Wenn das Argument nicht angegeben wird, wird die Datei als ASCII geöffnet. |
Einstellungen
Das iomode-Argument kann eine der folgenden Einstellungen haben:
Konstante | Wert | Beschreibung |
---|---|---|
ForReading | 1 | Öffnet eine Datei nur zum Lesen. Sie können nicht in diese Datei schreiben. |
ForWriting | 2 | Öffnen Sie eine Datei nur zum Schreiben. Verwenden Sie diesen Modus, um eine vorhandene Datei durch neue Daten zu ersetzen. Sie können aus dieser Datei nicht lesen. |
ForAppending | 8 | Öffnen einer Datei zum Schreiben an ihrem Ende. Sie können aus dieser Datei nicht lesen. |
Für das Argument Format ist jede der folgenden Einstellungen zulässig:
Konstante | Wert | Beschreibung |
---|---|---|
TristateUseDefault | -2 | Öffnet die Datei unter Verwendung der Systemvorgabe. |
TristateTrue | -1 | Öffnet die Datei als Unicode. |
TristateFalse | 0 | Öffnet die Datei als ASCII. |
Hinweise
Im folgenden Code ist die Vorgehensweise zum Verwenden der OpenTextFile-Methode des Öffnens einer Datei zum Anhängen von Text veranschaulicht:
Sub OpenTextFileTest
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending, True, TristateFalse)
f.Write "Hello world!"
f.Close
End Sub
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.