programming-examples/asp/More_Code_Snippets/Create a text file called test.asp

<% 
Dim objFSO, objFile 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFile = objFSO.CreateTextFile("d:\test.txt", True) 
objFile.WriteLine("This is a test.") 
objFile.Close
%>