CreateFile

<%
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("d:\ramesh.htm", True)
a.WriteLine("This is a test.")
a.Close
%>