[neo_neuro]

Selamlar dostlar,
Şöyle bir sorunum var yardımcı olabilirseniz sevinirim. Bir directory içinde yaklaşık 100 tane txt uzantılı dosyam var. Bu dosyaların her biri belli bir konuyla ilgili bir makale içeriyor. Bu dosyaların içindeki metinlerde ASP yardımıyla arama yapıp bunu listelemek istiyorum. Bunu yapmamın yolu nedir bir bilen varsa seslensin lütfen
Sevgiler...

[soul]

ASP ile her seferinde bu tip bir arama yapmak çok uğraştırır yani performans olark ta öyle teknik olarak ta öyle sayılır.

Google kullanabilirsin yada bunları bir database koyabilirsin.

İlle de ASP ve text ile yapacağım dersen

FSO - For Each In ile klasördeki tüm dosyaları aç, Instr() ile search et ve sonuçları listele.

Ancak belirttiğim gibi bu seçenek her açıdan en kötü olanı olacaktır.

[neo_neuro]

Teşekkürler soul. Bu işlerin Database ortamında yapılması gerektiğini söyledim ama müşteriye bunu anlatabilmek ayrı bir konu. Dediğin yöntemi deneyeceğim bakalım ne sonuçlar doğuracak.

[neo_neuro]

Belki birilerinin işine yarar yazdığım kodları ekliyorum

<%
Dim dosya, path, sayi, i, dosyadegiskeni,ArananKelime, Sonuc
set dosya = server.CreateObject("Scripting.FileSystemObject")
set path = dosya.GetFolder(server.MapPath("dosya/"))

sayi = path.Files.count
Response.Write(sayi & " sayfada arama yapıldı.<strong>" & Request.form("Arama") & "</strong> kelimesini iceren sayfalar aşağıdadır.<p></p>")

For i=1 to sayi
set dosyadegiskeni=dosya.OpenTextFile(server.MapPath(" dosya/" & i & ".txt"),1)
a = dosyadegiskeni.readALL
ArananKelime = Request.form("Arama")
Sonuc = Instr(a, ArananKelime)
if Sonuc >0 then
Response.Write("<a href=" & path & "/" & i & ".txt>Bulunan Sonuç</a><br>")
end if
dosyadegiskeni.Close
Next

set dosyadegiskeni=Nothing
set path=Nothing
set dosya=Nothing
%>

Sıralı numaralandırılmış dosyalarda gayet sorunsuz çalışıyor. İçlerinde arama yapılacak text dosyaları, dosya isminde bir dizinde bulunuyor. Yol gösterdiğin için teşekkürler soul