VBS/WSH/JS - [решено] Как записать строку в текстовый фаил?

[Timurgall]

Задача записать размер файла в текстовый фаил.



Код:

Код: Выделить всё

 
Set FSO = CreateObject("Scripting.FileSystemObject") 
Set Filedev = FSO.GetFile("h:\backup\workdb.dev") 
fsize = Filedev.Size 
Set Filetxt = FSO.OpenTextFile ("h:\backup\workdb.txt")  
Filetxt.WriteLine Date & "->" & fsize & "bytes" 
filetxt.close

Выходит ошибка в строке 5 символ 1 , Bad File Mod

Не могу понять где ошибка, или как сделать правильно?

[Timurgall]

Проблема решена, вот так правильно

Set Filetxt = FSO.OpenTextFile ("h:\backup\workdb.txt", 8, true)