<%
'-- Öncelikle FileSystemObject nesnesi DosyaNesnesi isimli değişkene aktarıldı.
Set DosyaNesnesi=CreateObject("Scripting.FileSystemObj ect")
'-- Server'ın kök klasörü altında ornek.txt isimli dosya açıldı.
Set Dosya=DosyaNesnesi.OpenTextFile(Server.MapPath("or nek.txt"),2,False,False)
'-- ornek.txt içerisine Merhaba yazılı bir satır ekler.
Dosya.WriteLine("Merhaba")
'-- Dosya değişkeni server'ın belleğinden atıldı.
Dosya.Close
'-- DosyaNesnesi değişkeni server'ın belleğinden atıldı.
Set Dosya=Nothing
Set DosyaNesnesi=Nothing
%>