[ASP]Kod Göster Kodu

<!– http://www.kodmerkezi.com –>
2	<%
3	whichfile=server.mappath(“default.asp”)
4
5	Set fs = CreateObject(“Scripting.FileSystemObject”)
6	Set thisfile = fs.OpenTextFile(whichfile, 1, False)
7
8	counter=0
9	do while not thisfile.AtEndOfStream
10	counter=counter+1
11	thisline=thisfile.readline
12	response.write server.htmlencode(thisline) & “<br>”
13	loop
14
15	thisfile.Close
16	set thisfile=nothing
17	set fs=nothing
18	%>
19
20	<!– http://www.kodmerkezi.com –>