Milli Piyango Sonuçlarını Çekme İşlemini http://www.millipiyango.gov.tr/sonuc.html bölümünden nasıl yaparım c#'ta
Milli Piyango Sonuçlarını Çekme
Cevaplar
Selamlar,
http://millipiyango.gov.tr/haftalik_loto_bilgileri.xml
Bu xml de hafta hafta yayınlanmakta. Xml' i kullanarak elde edebilirsin.
Kolay gelsin.
http://millipiyango.gov.tr/haftalik_loto_bilgileri.xml
Bu xml de hafta hafta yayınlanmakta. Xml' i kullanarak elde edebilirsin.
Kolay gelsin.
hocam sayısal loto değil milli piyango sonuçlarını çekmem lazımhokumus dedi: ↑Selamlar,
http://millipiyango.gov.tr/haftalik_loto_bilgileri.xml
Bu xml de hafta hafta yayınlanmakta. Xml' i kullanarak elde edebilirsin.
Kolay gelsin.
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
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