Selam ile. Bir derste daha birlikteyiz. Asp ile metin dosyasından veri okuyacağız. Dosyadan veri okuman için önce dosyaya bağlanmak gerekir tabi. Hem dosyaya bağlanacağız, hem de metin dosyasındaki veriyi okuyacağız. Bakalım başarılı olabilecek miyiz.
Hemen metin dosyamızı oluşturalım. Not defterini açın ve içine bir cümle yazın, dosyanızı metin.txt ismiyle kaydedin. Önce kodları yazalım ardından da beraber inceleyelim.
KOD:<% @Language = "VBScript" CODEPAGE="1254" %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-"1254">
<title>Metin Dosyasından Veri Okuma</title>
</head>
<body>
<%
Set conn = Server.CreateObject("Scripting.FileSystemObject")
Set oku = conn.OpenTextFile(Server.MapPath("metin.txt"),1)
Response.Write(oku.ReadAll)
oku.Close
Set oku =Nothing
Set conn = Nothing
%>
</body>
</html>
Şimdi gelelim kodlarımızın açıklamasına. Önce dosyaya bağlandık.
KOD:Set conn = Server.CreateObject("Scripting.FileSystemObject")
Kodu ile dosya bağlantısı yaptık. Daha sonra metin.txt dosyasını açtık. Bunu da
KOD:Set oku = conn.OpenTextFile(Server.MapPath("metin.txt"),1)
Kodu ile yaptık. Bu satırdaki 1 dosyanın sadece okunmak için açılacağını belirtir. Dosyayı açtıktan sonra tamamen okunmasını sağladık. Bunu da;
KOD:Response.Write(oku.ReadAll)
Kodu ile yaptık. Sonra da oluşturduğumuz oku ve conn değişkenini kapattık, bunu da;
KOD:Set oku =Nothing
Set conn = Nothing
Kodları ile yaptık. Sayfayı görüntülediğiniz zaman, tarayıcıda sadece metin dosyasına yazdıklarınız görünecektir. Herhangibir bir sorunuz yada sorununuz olursa forumumuza yazabilirsiniz.
Html ( 15 )
