For Each Element As HtmlElement In WebBrowser1.Document.GetElementsByTagName("input")
If Element.OuterHtml.Contains("id=suggestCost name=info[suggestCost]") Then
WebBrowser1.Document.GetElementById("suggestCost").SetAttribute("value", recofee)
End If
Next
For Each Element As HtmlElement In WebBrowser1.Document.GetElementsByTagName("input")
If Element.OuterHtml.Contains("onclick=checkMyForm()") Then
statePath = 5
Element.InvokeMember("click")
End If
Next
For Each Element As HtmlElement In WebBrowser1.Document.GetElementsByTagName("div")
If Element.GetAttribute("className") = "programTable" Then
Dim sour As String = Element.OuterText.ToString
Dim mc As MatchCollection = Regex.Matches(sour, "(\d+):(\d+)")
Dim m As Match
Dim s As List(Of String) = m.toString()
For Each m In mc
MessageBox.Show(m.ToString)
Next m
End If
Next
این کدرو توی vb.net نوشتم دقیقاً کاری که مد نظرم رو اجرا میکنه اما میخوای اینو توی بیسیک اندروید پیاده کنم. دوستان لطفاً راهنمایی کنید.
سوال
hossein.r1369 1
درود خدمت دوستان
چطور میشه تو بیسیک اندروید چنین کدی رو پیاده کرد؟
For Each Element As HtmlElement In WebBrowser1.Document.GetElementsByTagName("input") If Element.OuterHtml.Contains("id=suggestCost name=info[suggestCost]") Then WebBrowser1.Document.GetElementById("suggestCost").SetAttribute("value", recofee) End If Next For Each Element As HtmlElement In WebBrowser1.Document.GetElementsByTagName("input") If Element.OuterHtml.Contains("onclick=checkMyForm()") Then statePath = 5 Element.InvokeMember("click") End If Next For Each Element As HtmlElement In WebBrowser1.Document.GetElementsByTagName("div") If Element.GetAttribute("className") = "programTable" Then Dim sour As String = Element.OuterText.ToString Dim mc As MatchCollection = Regex.Matches(sour, "(\d+):(\d+)") Dim m As Match Dim s As List(Of String) = m.toString() For Each m In mc MessageBox.Show(m.ToString) Next m End If Nextاین کدرو توی vb.net نوشتم دقیقاً کاری که مد نظرم رو اجرا میکنه اما میخوای اینو توی بیسیک اندروید پیاده کنم. دوستان لطفاً راهنمایی کنید.
لینک ارسال
به اشتراک گذاری در سایت های دیگر
1 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.