Skip to main content

AccessTr.neT


WebBrowser'da Javascript Button Click 2

WebBrowser'da Javascript Button Click 2

Çözüldü #1
Buradaki açmış olduğum konuya şöyle bir çözüm buldum.

Açılan sayfadaki "pdf" doyalarını kodu ile tıklatabiliyorum

Dim elms As HtmlDocument = Me.WebBrowser1.Document
For Each elm As HtmlElement In elms.GetElementsByTagName("input")
If elm.GetAttribute("value") Like "*(PDF)*" Then
elm.InvokeMember("click")
End If
Next


Fakat bu dosyaları yeni sayfada açıyor. Ben yeni sayfada açılmasını istemiyorum. Arka planda çalışsın hatta direkt indirsin.

Teşekkürler.
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
Try
Dim sayi As Integer = InputBox("Lütfen İndirmek İstediğiniz TAHAKKUK Numarasını Girini")

WebBrowser1.Document.GetElementById("form" & sayi).SetAttribute("action", "https://ebildirge.ssk.gov.tr/WPEB/TahakkukFisi.pdf?rapor=TahakkukFisi&n=0")
Me.WebBrowser1.Document.GetElementById("form" & sayi).InvokeMember("submit")
Catch ex As Exception
MsgBox("Bu numaralı evrak bulunamadı")

End Try

Böyle bir çözüm ürettim. Konu tamamdır.

drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da