<%@ LANGUAGE="VBSCRIPT" %> <% dim FSO dim fname response.write("

Privyet, Mir!

") 'Create an instance of the FSO object Set FSO = Server.CreateObject("Scripting.FileSystemObject") ' create a text file Set fname=FSO.CreateTextFile("irene-test-asp.txt",true) fname.WriteLine("Hello World!") fname.Close If (FSO.FileExists("irene-test-asp.txt"))=true Then Response.Write("asp: I was able to write to a text file.") ' FSO.DeleteFile("irene-test-asp.txt") Else Response.Write("asp: I was NOT able to write to a text file.") End If set FSO=nothing %>