İçeriğe geç
ShiftDelete.Net
Haber ara/ SDN'ye SorGiriş
Haber Akışı SDNTV İnceleme Forum Yapay Zeka Akıllı Telefon Elektrikli Otomobil Oyun ShiftDelete.Net Global Teknoloji Haberleri Mobil Otomobil Donanım Savunma Bilim Sosyal Medya İnternet Giyilebilir Teknoloji Rehber Ürünler Son dakika Yazarlar
  1. Ana sayfa
  2. Topluluk
  3. Programlama
  4. SDN Programlama Kafe
SDN Programlama Kafe

Milli Piyango Sonuçlarını Çekme

İOS20.12.20123 cevap2.882 görüntüleme
Cevaplar
#4
http://www.millipiyango.gov.tr/sonuc_alt.shtml
bu sayfayı doldurarak açılan pencereden çekebilirsin sanırım

vb versiyonu C# a çevrilebilir

ForEach el As HtmlElement In wb1.Document.GetElementsByTagName("select")
If el.Name = "db_file_name" Then
For Each comboItem As HtmlElement In el.Children
If comboItem.InnerText = "29 Ekim 2012" Then
comboItem.SetAttribute("Selected", "True")
GoTo devam
End If
Next
End If
Next

devam:

For Each el As HtmlElement In wb1.Document.GetElementsByTagName("input")
If el.Name = "bilet_no" Then
el.InnerText = "1234567"
GoTo devam2
 
End If
Next

devam2:

For Each el As HtmlElement In wb1.Document.GetElementsByTagName("input")
If el.Name = "submit" Then
el.InvokeMember("Click")
Exit Sub
End If
Next

Cevabını yaz

Cevap yazmak için giriş yap ya da üye ol. Eski forum kullanıcı adın ve parolanla girebilirsin.