Asp varolan bir text dosyasını görüntüleme

Bu dersimizde sizlerle sunucumuz da text dosyasıını var olup olmadığına bakacağız. Bunun için örnek bir uygulama hazırlayalım . Bu örnekte VBScript dili kullanılmıştır.

Kod:

<%
‘ Öncelikle FileSystemObject nesnesi DosyaNesnesi adlı değişkene aktarıldı.
Set  DosyaNesnesi=CreateObject(”Scripting.FileSystemObject” )
‘ Server’ın kök klasörü altında ornek.txt adlı 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
%>