 |
Mit dem Windows Scripting Host ist es möglich, Daten in eine Textdatei zu schreiben und auch zu lesen. Zum Zugriff auf eine Textdatei wird lediglich das FileSystemObject des WSH benötigt. |
Das nachfolgende Script zeigt Ihnen die Handhabung anhand des Kopierens einer Textdatei.
Zuerst muss das "FileSystemObject" erstellt werden, um auf das Dateisystem zugreifen zu können.
Set objFSO = CreateObject("Scripting.FileSystemObject")
Anschließend müssen Sie eine Textdatei zum Schreiben und eine weitere zum Lesen öffnen.
Set file = objFSO.OpenTextFile("C:
ead.txt")
Set file2 = objFSO.OpenTextFile("C:copy.txt", ForWriting, true)
Um nun eine Datei zu lesen und dann in eine andere zu schreiben, müssen Sie dies Zeile für Zeile machen. Das geschieht am Besten in einer Do While -Schleife.
Do While Not (file.atEndOfStream)
temp = file.Readline
file2.WriteLine(temp)
Loop
Danach sollten Sie noch die beiden Textdateien auf "Nothing" setzen, um das Ende der Schreib- bzw. Leseaktion zu setzen.
Set file = Nothing
Set file2 = Nothing
Nun haben Sie auch schon die Textdatei "C:\

read.txt" in "C:\

copy.txt" kopiert, mehr ist dazu nicht nötig.
Autor: Dominik Berger