Sayın Hocalarım; EK'teki dosyada ">>>" butonu ile "http://universitetercihleri.com/yks-tyt-ayt-tercih" sitesindeki linkine nasıl tıklama yapabilirim?

Merhaba, butona tıklayınca web sitesinin webbrowserda açılmasını mı istiyorsunuz. Farklı birşey istiyorsanız açık yazabilir misiniz?

Hocam; Formdaki butona tıklayarak yeni sayfaya geçmek istiyorum.

(08/09/2018, 15:48)idrisy yazdı: Hocam; Formdaki butona tıklayarak yeni sayfaya geçmek istiyorum.

Yeni sayfaya geçmek ile ne demek istediğinizi anlamadım ama aşağıdaki kodu butonun tıklandığında olayına ekleyerek deneyiniz.

Yer = "http://universitetercihleri.com/yks-tyt-ayt-tercih"



WebBrowser1.Navigate2 URL:=Yer



WebBrowser1.silent = True

Hocam; sayfanın altında sayfa sayısı ve oradaki ileri ">>>" butonuna tıklayarak sayfalarda ilerlemek istiyorum.

Butona tıklayınca webbrowserdaki sayfada bulunan >>> imgesine tıklanmasını istediğinizi niye en başta yazmıyorsunuz??

Set HTMLdoc = WebBrowser1.Document



Set TDelements = HTMLdoc.getElementsByTagName("a")



For Each TDelement In TDelements

 

    If TDelement.innerText = ">>>" Then

     

        TDelement.Click

 

    End If



Next