Close-Methode

Schließt eine geöffnete TextStream-Datei.

Syntax

Object.Close

Argumente

Object: Erforderlich. Immer der Name eines TextStream-Objekts.

Anmerkungen

Das folgende Beispiel veranschaulicht die Verwendung der Close-Methode.

Beispiel 1:

Sub CreateAFile
   Dim fso, tso
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set tso = fso.CreateTextFile("c:\testfile.txt", True)
   tso.WriteLine("This is a test.")
   tso.Close
End Sub

Beispiel 2:

Sub AppendToFile
    Dim fso, tso
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set tso = fso.OpenTextFile("C:\testfile.txt", 8)
    tso.WriteLine("Appending this text.")
    tso.Close
End Sub