[ابو روضة]

(12-09-19, 11:42 PM)SnTnt كتب :

(12-09-19, 03:15 AM)شكرا لك كتب :

الان سأقوم بأستكمال المشروع

تعلمت منك كود جديد , وجعلتني لا اتوقف )


أحاول الان البحث عن كود عندما اختار من الكومبو بوكس من البرنامج
يختار تلقائية من الموقع 
تقدر تساعدني لو سمحت 

شكرا ...

اتفضل أخى

كود :

 For Each elem As HtmlElement In WebBrowser1.Document.GetElementsByTagName("td")
           If (elem.GetAttribute("colspan") = "2") Then
               For Each element As HtmlElement In elem.GetElementsByTagName("select")
                   For Each element2 As HtmlElement In element.GetElementsByTagName("option")
                       element2.InnerText = ComboBox1.SelectedItem
                   Next
               Next
           End If
       Next