Bu işlem sayesinde text dosyadan verilerinizi okuyabilir ve değerlendirebilirsiniz.
<%
'-- Ö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)
'-- ornek.txt içindeki ilk satır okundu ve okunan değer isimli değişkene aktarıldı.
okunandeger=Dosya.ReadLine
'-- okunan değer içeriği ekrana yazdırıldı.
Response.Write(okunandeger)
'-- 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
%>