<% Dim objFSO, objTextStream, file file = Server.MapPath("samplefile.txt") Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objTextStream = objFSO.OpenTextFile(file , 2, True) #If I'm not mistaken you can bump these two writes into one. objTextStream.WriteLine "We are writing a line of text to our text fil +e" objTextStream.Write "This is our second line of text" & VBCrLf #You didn't echo in the perl example Response.Write "we have written to our text file" objTextStream.Close #Are these neccesary ? Set objTextStream = Nothing Set objFSO = Nothing %>