Dim logfileWriter Dim logfile Dim path path = Server.MapPath("/beta/Data/output.txt") Set logfileWriter = CreateObject("Scripting.FileSystemObject") f logfileWriter.FileExists(path) Then Set logfile = logfileWriter.OpenTextFile(path, 8) logfile.WriteLine(strAbsFile) logfile.Close() Else Set logfile = logfileWriter.CreateTextFile(path) logfile.WriteLine(strAbsFile) logfile.Close() End If Set logfileWriter = Nothing Set logfile = Nothing Set path = Nothing