Trim fonksiyonuyla html sayfasından veri çekmek


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: lDarkAngeL    0 Yorum    151 Görüntüleme

Paylaşım Tarihi: 02.08.2016, 14:51:48 #1
lDarkAngeL ClavoR
Efsane Üye
Status: Çevrimdışı Yorumları:1,365 Konuları:509 Kayıt Tarihi:19.03.2016 Rep Puanı: 838

'inet nesnesiyle veri çekeceğimeiz kaynağa bağlanıp String formatında ham veriyi elde ettikten sonra Trim fonksiyonuyla istediğimiz yerleri alarak kullanabiliriz.
'örnek olarak merkez bankasının html sitesinden döviz bilgilerini alan bir fonksiyon :

PrivateFunction DovizKurCek()
Dim strkur AsString
strkur = Inet1.OpenURL("http://www.tcmb.gov.tr/kurlar/today.html")
lblDovizUSD = Trim(Mid(strkur, InStr(strkur, "USD") + 39, 10))
lblDovizEUR = Trim(Mid(strkur, InStr(strkur, "EUR") + 39, 10))
lblDovizUSDsatis = Trim(Mid(strkur, InStr(strkur, "USD") + 55, 10))
lblDovizEURsatis = Trim(Mid(strkur, InStr(strkur, "EUR") + 55, 10))
lblDovizGBP = Trim(Mid(strkur, InStr(strkur, "GBP") + 39, 10))
lblDovizGBPsatis = Trim(Mid(strkur, InStr(strkur, "GBP") + 55, 10))
EndFunction 

Kullanıcı İmzası
A3jRQr.gif




Önceki Konu Sonraki Konu





Aradığınızı Bulamadınız Mı ?

Konuyu Okuyanlar:
1 Ziyaretçi