Metin Belgesinden Veri Almak

<%
'|=======================================|'
'| Metin Belgesinden Veri Almak |'
'| Mustafa Kaan KAMIŞ |'
'| msn@kaankamis.info |'
'| 22 Temmuz 2008 02:30 |'
'|=======================================|'

' Tanımlamaları Yapalım.
Dim FSO, MetinBelgesi, KAAN

' Sunucudan FSO'yu Açıyoruz.
Set FSO = CreateObject("Scripting.FileSystemObject" )

' Metin Belgesine Bağlanıyoruz.
Set MetinBelgesi = FSO.OpenTextFile("C:\Inetpub\wwwroot\KAANKAMIS.txt",1, 0 )
' !!! C:\Inetpub\wwwroot\KAANKAMIS.txt Burayı isteğinize göre düzenleyiniz.

' Tanımlama ve Ekrana Işleme Kodları..
Do
KAAN = MetinBelgesi.ReadLine

Response.Write KAAN

Loop Until MetinBelgesi.AtEndOfStream
MetinBelgesi.Close

'|=======================================|'
'|Iyı Çalışmalar, |'
'| Mustafa Kaan KAMIŞ |'
'| msn@kaankamis.info |'
'| 22 Temmuz 2008 02:30 |'
'|=======================================|'
%>

Yorum Yapabilmek İçin Üye Girişi Yapmanız Gerekmektedir.

metin belgesinden veri almak