Webbrowser Da İf Kullanımı

17/11/2017, 09:05

stringeer

Ö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
19/11/2017, 00:11

ozanakkaya

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
20/11/2017, 08:10

stringeer

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