<% Option Explicit %> 
<HTML> 
<HEAD> 
<TITLE>ASP ILE DOSYADAN METİN OKUMA</TITLE> 
<META http-equiv="content-type" content="text/html; charset=ISO-8859-9"> 
<META http-equiv="Content-Type" content="text/html; charset=windows-1254"> 
</HEAD> 
<BODY> 
<% 
Dim DosyaSistemi, MetinDosyasi, Satir, Server 
Set DosyaSistemi = CreateObject("Scripting.FileSystemObject" ) 
Set MetinDosyasi = DosyaSistemi.OpenTextFile("d:\wwwroot\aslan_077.txt",1, 0 ) 
Do 
Satir = MetinDosyasi.ReadLine 
%> 
<%=Satir%><br> 
<% 
Loop Until MetinDosyasi.AtEndOfStream 
MetinDosyasi.Close 
%> 
<br> 
Senin path : <%=Request.ServerVariables("APPL_MD_PATH" )%><br> 
Senin IP adresin : <%=Request.ServerVariables("REMOTE_ADDR" )%> 
</BODY> 
</HTML>
Sunucuda FSO bileşeni kurulu olmalıdır. Genelde ücretli hostların tümünde bulunur

Not: Alıntıdır.