Html Den Kelime Arama

[Abdyresul]

Merhabalar, turkcem zayif hatalarym olsa kusura bakmayin.Ben turkmenistanliyim, tnctr.com okuycusuyum. Autoplay media studiada yeniyim.
Ben autoplay ile bir button a basildiginda kendi belirledigim klasordeki *.html dosyalardan input a girdigim kelimeyi bulmasini istiyorum.
Yardimlariniz icin simdiden tesekkurler.

gozlemeli = Input.Get.Text("Input1");
Folder.SetCurrent("AutoPlay\\Docs");
gozleg~= " " then
gozlenen = File.Find(gozleg, "*.html", true, false, nil, nil);
if gozlenen=="0" then
Dialog.TimedMessage("Gozleg", "Fayl yok", 2000);
else
Dialog.TimedMessage("Gozleg", "Tapyldy", 2000);
barlag= string.Find(gozlenen, gozlemeli, 1, true);
if barlag>"0" then
Web.LoadURL("Web1", barlag);
end
end
end



hata veriyor lutfen yardim edin.

[DivaneTR]

[spoiler]

sFile = ""
bResult = false

sAra = Input.GetText("Input1");
tFiles = File.Find("AutoPlay\\Docs", "*", false, false, nil, nil);
if tFiles then
for index,file in pairs (tFiles) do
sRead = TextFile.ReadToString(file);
Find = String.Find(sRead, sAra, 1, false);
if Find ~= -1 then
bResult = true
sFile = file
else
end
end
end

if bResult then
Dialog.Message("Metin bulundu", "Aradığınız metin "..sFile.." içinde bulundu!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
Dialog.Message("Metin bulunamadı", "Aradığınız metin bulunamadı.", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
end

[/spoiler]

https://www.mediafire.com/?lfto42ucan5lcxx

Edited December 2, 2014 by DivaneTR