+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Webden Veri Çekme (/konu-webden-veri-cekme--87554.html)
Sayfalar:
1
2
Webden Veri Çekme - notrino - 13/08/2020
Merhabalar,
Bu konu çokça işlenmiş ama bir türlü bunu uygulayamadım. Hatta geçmişte kendim de benzer bir soru sordum ve oradaki cevaplanan uygulamayı buraya uygulayamadım. İstediğim şey aslında basit.
Ekli dosyada butona tıklanınca textbox içine "http://bigpara.hurriyet.com.tr/kobi/dunya-emtia-borsalari/sxaggr-gumus-gram/" sitesindeki "Alış(TL) hücresinin içindeki verinin" gelmesini istiyorum. Sadece bu. Teşekkürler..
RE: Webden Veri Çekme - ozanakkaya - 13/08/2020
Const GLink As String = "http://bigpara.hurriyet.com.tr/kobi/dunya-emtia-borsalari/sxaggr-gumus-gram/"
Dim GVeri
Dim appIE As Object
Set appIE = CreateObject("internetexplorer.application")
With appIE
.Navigate GLink
.Visible = False
End With
Do While appIE.Busy: DoEvents: Loop
Set GVeri = appIE.Document.querySelector(".kurBox span[class='value up']")
Me.Metin1 = GVeri.innertext
appIE.Quit
Set appIE = Nothing
RE: Webden Veri Çekme - notrino - 13/08/2020
Çok teşekkürler. Tam istediğim gibi sade...
2 sorum olacak.
1) Kod dizilimindeki create object içinde Internetexplorer.application diye bir şey yazıyor. Eğer ilerde başka bir denemede ilgili sayfa explorer ile açılamıyor da chrome ile açılabiliyorsa bu durumda hata oluşur mu? (Yani chrome.application diye bir şey var mı?)
2) Web sayfasındaki AlışTL hücresinin ".kurBox span[class='value up']" olduğunu nerden buldunuz? Çünkü ben Chrome ile sayfayı açıp "İncele" dediğimde ilgili hücre için "<span class="value up">6,13</span>" tarzı bir ifade buluyorum. Ben bunu yazmıştım çalışmadı tabi...
RE: Webden Veri Çekme - ozanakkaya - 13/08/2020
1- chrome.application diye bir kod kullanamazsın.
2- bahsettiğiniz
<span class="value up">6,14</span>kodu
<div class="kurBox">kodunun içerisinde.
Bu yüzden
Set GVeri = appIE.Document.querySelector(".kurBox span[class='value up']")Şeklinde yazıldı. Html ve vb bilginiz yok ise çözebilmeniz zor.
RE: Webden Veri Çekme - notrino - 13/08/2020
Tamamdır, çok teşekkürler. Html bilgim pek yok, deneme yanılmayla ...
RE: Webden Veri Çekme - notrino - 13/08/2020
Peki bu konu hakkında bir şey daha sorayım,
Aynı site içinde AlışTL hücresi ve SatışTL hücresi yanyana bulunuyor. Gördüğüm kadarıyla ikisi de kurbox ile ifade ediliyor. Sizin yazdığınız koddaki kurbox Alışı, Satıştan nasıl farkediyor? SatışTL hücresinin ifadesi kurbox tan farklı birşey mi?