تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تعديل على الكود
#1
Exclamation 
                                      السلام عليكم ورحمة الله وبركاته






اريد من اخوتي الكرام كيفية عمل شرط لهذا الكود بحيث مثلا ان لم يوجد زر الضغط في الصفحه يضهرلك تنبيه



مثال على الكود

كود :
 Dim elements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("a")
       For Each pElem As HtmlElement In elements
           If (pElem.OuterHtml.Contains("next")) Then
               pElem.InvokeMember("click")


           End If
الرد }}}
تم الشكر بواسطة:
#2
PHP كود :
Dim elements As HtmlElementCollection WebBrowser1.Document.GetElementsByTagName("a")
Dim btn = (From x In elements Where x.OuterHtml.Contains("next")).FirstOrDefault
If Not IsNothing(btnThen
    btn
.InvokeMember("click")
Else
 
   MsgBox("Nothing")
End If 
الرد }}}
تم الشكر بواسطة: mervandzz
#3
(22-10-17, 05:10 PM)a.ahmed كتب :
PHP كود :
Dim elements As HtmlElementCollection WebBrowser1.Document.GetElementsByTagName("a")
Dim btn = (From x In elements Where x.OuterHtml.Contains("next")).FirstOrDefault
If Not IsNothing(btnThen
    btn
.InvokeMember("click")
Else
 
   MsgBox("Nothing")
End If 

مشكور يااخي Smile
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: