Set objFSO=CreateObject("Scripting.FileSystemObject") ' Write to a file outFile = "c:\path\to\file.txt" Set objFile = objFSO.CreateTextFile(outFile,True) objFile.Write "test" & vbCrLf objFile.Close