Forma webbrowser ekleyeceksiniz. sitedeki hangi alana hangi metin kutusundaki verinin aktarılacağını da yazdım.
WebBrowser0.Document.GetElementById("AdSoyad").InnerTEXT = Me.ad.Value
Webbrowserda site açıldığında, id değeri AdSoyad olan input'a, formdaki ad isimli metin kutusundaki veri aktarılır.
For Each sel In WebBrowser0.Document.getElementsByTagName("option")
If sel.Value = Me.il.Value Then
sel.Selected = True
End If
Next
Kodu ile de, formdaki il metin kutusuna "Ankara" yazdıktan sonra, kod çalıştığında Ankara'yı seçili hale getirir. Web sayfasındaki il alanında Javascript var, seçilen veriye göre ilçe inputunda veri yenileniyor. Üstteki kodun benzerini ilçe olacak şekilde değiştirip koda eklemeniz gerekiyor.
Tüm bu işlemler tamamlandığında butonun tıklanması kalıyor. Onun kodu da
For Each btn In WebBrowser0.Document.all.tags("Button")
If btn.Type = "submit" Then
btn.Click
End If
Next btn
Sizin eklediğiniz sayfa koduna göre ilçe olayını çözmem mümkün değil. orijinal site üzerinden yapılması gerekiyor. Ancak verdiğim kodlar ile bunun çözümü basit.
Üzerinde çalışın, yapamazsanız olmayan yeri sorun.