AccessTr.neT
Webbrowser Da İf Kullanımı - Baskı Önizleme

+- 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ığı: Webbrowser Da İf Kullanımı (/konu-webbrowser-da-if-kullanimi.html)



Webbrowser Da İf Kullanımı - stringeer - 17/11/2017

Öncelikle iyi günler arkadaşlar. Sorum web sitesinden sorgulama yaptığımda çıkan Html kodunun diğer bazı sorgulamalarda çıkmamasından kaynaklı. Örneğin;
Kod:
<span class="ui-paginator-current">Sayfa : 1 / 6</span>
bu kod bazı sorgulamalarda çıkmıyor. Bunu if le yapmaya çalıştım ancak sağlıklı sonuç alamadım. Ekteki çalışmamı inceleyip yardımcı olabilirseniz çok memnun olurum. Teşekkürler


Cvp: Webbrowser Da İf Kullanımı - ozanakkaya - 19/11/2017

Merhaba,


WebBrowser0.Document.getElementsByClassName("ui-paginator-next ui-state-default ui-corner-all").Item(Index:=0).Click

Bu kod yerine aşağıdaki kodu ekleyiniz.

Dim GObje As Object

For Each GObje In WebBrowser0.Document.all.tags("div")

   If GObje.id = "form1:j_id1905403385_4de847a4:dtIslemMalzeme_paginator_bottom" Then
       WebBrowser0.Document.getElementsByClassName("ui-paginator-next ui-state-default ui-corner-all").Item(Index:=0).Click
   End If

Next GObje



Cvp: Webbrowser Da İf Kullanımı - stringeer - 20/11/2017

Teşekkürler Ozan Hocam, ellerinize sağlık.