Tcmb Kurlar Nasıl Çekilir ?

[muratboy31]

Merhaba üstadlar,

 

Daha önce tcmb den kur çekme gibi bir örnek yapan oldumu ?

 

Teşekürler

[reyiz]

https://www.google.com.tr/search?q=tcmb+site:www.tnctr.com

[muratboy31]

ben ams de böyle bir örnek varmıdır diye sordum ?

Edited August 1, 2013 by muratboy31

[reyiz]

http://www.tnctr.com/topic/212605-html-dosyasndan-veri-ekme/

[muratboy31]

Neden böyle bir hata alıyorum acaba ?

 

 

Kullandığım kod bu ;

 

HTTP.Download("http://www.tcmb.gov.tr/kurlar/today.html", _TempFolder .. "\\kur.txt", MODE_TEXT, 20, 80, nil, nil, nil)
local kurlar = TextFile.ReadToString( _TempFolder .. "\\kur.txt")

 

function kuralis(input, text, pos, lenght)
 kuralis = String.Find(kurlar, text, 1, false)
 kur = String.Mid(kurlar, kuralis + pos, lenght)
 Input.SetText(input, kur)  
end

function kursatis(input, text, pos, lenght)
 kursatis = String.Find(kurlar, text, 1, false)
 kur = String.Mid(kurlar, kursatis + pos, lenght)
 Input.SetText(input, kur)  
end

kuralis("Input1", "1 ABD DOLARI", 37, 6)
kursatis("Input2", "1 ABD DOLARI", 52, 6)

kuralis("Input3", "1 EURO", 37, 6)
kursatis("Input4", "1 EURO", 52, 6)

[reyiz]

Apz dosyasını verir misiniz?

[muratboy31]

Apz dosyasındaki tüm kod bu zaten :) başka hiçbir kod yok... ama yinede isterim dersen eklerim

[reyiz]

İyi olur. Bu şekilde kodlara odaklanamıyorum.

[muratboy31]

http://tr.rghost.net/47820620