<%
Set ConFile=CreateObject("Scripting.FileSystemObject")
Set File=ConFile.CreateTextFile(server.mappath("klasor/dosya.txt"), true)
File.WriteLine "Bu yazı text dosyasına yazılacak."
Set ConFile=Nothing
%>