Writing a file with VBScript

Dim fso    : Set fso  = CreateObject("Scripting.FileSystemObject")
dim file   : Set file = fso.CreateTextFile("C:\temp\out.txt")

file.WriteLine("first line" )
file.WriteLine("second line")
file.WriteLine("third line" )