<%
'-- Öncelikle FileSystemObject nesnesi DosyaNesnesi isimli değişkene aktarıldı.
Set DosyaNesnesi=CreateObject("Scripting.FileSystemObject" )
'-- Server'ın kök klasörü altında ornek.txt isimli dosya açıldı.
Set Dosya=DosyaNesnesi.OpenTextFile(Server.MapPath("\ornek.txt" ),1,False,False)
'--Dosya üzerinde İstenilen işlemler bu satırda yapılabilir
'-- 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
%>