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