Запись данных в CSV файл

[Curse]

Помогите пожалуйста написать скрипт для записи данных в csv файл.

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

Dim FSO, F, FileName, tso
Set FSO = CreateObject("Scripting.FileSystemObject")
FileName = "C:\Sizes.csv"

If Not fso.FileExists(FileName) Then
		Set tso=fso.CreateTextFile(FileName,false,true)
		tso.WriteLine CStr(CStr(Size_) + ";" + CStr(Time_) + ";")
        tso.Close
End If

Set F = FSO.OpenTextFile(FileName, 2)
F.WriteLine CStr(Size_) + ";" + CStr(Time_) + ";" 
F.Close

Вот процедура записи времени и размера... не знаю как реализовать запись в следующие строки подряд... на данный момент запись идёт только в строку номер 1.