[ابو روضة]

(29-12-19, 07:17 PM)ابو ليلى كتب : السلام عليكم و رحمة الله و بركاته
الاخ ابو روضة,
عبر استخدام HtmlAgilityPack نجلب محتوى العقدة المحددة عبر تمرير Xpath كما سبق.
حيث ان Selenium ستقوم بفتح نافذة في المتصفح و نحن لا نريد ذلك.
اسوء ما في الامر هو هذه الاداة العجوز Web Browser الخاصة باللغة لا تمكنك من الوصول الى غايات كثيرة.
على اي حال تم تنفيذ المطلوب مع المحافظة قدر الامكان على الكود الموجود.
الطرقة تتبع منهج Async Await لمحاولة تلافي مشكلة تحميل الصفحات قدر الامكان.
اذا رايت ان هناك شرحاً مطلوب فقط اخبرنا, لان الكود بسيط و المكتبة معروفة و مشهورة.
بالتوفيق.

ماشاء الله فنان أخى الكريم أبو ليلى وهذا ليس جديداً عليك فمنذ أن دخلت هنا وأنا أقول هذا بينى وبين نفسى...

أنا بفضل الله أتقن التعامل مع ال HtmlAgilityPack وال Selenium لكنى كنت دائما أعانى دائما من هذه النقطة بالتحديد وهى عرض المقال فقط فى الأداه العقيمة الويب براوزر فأنا أستخدمها الآن فقط لقراءة محتويات المواضيع لآنى أتقن التعامل معها هى الأخرى لكن لم يوردّ علىّ هذا من قبل أى إخفاء جزء من الصفحة ومع المحاولة وغيابك لظروفك الخاصة طبعا قدرت أعملها بفضل الله بهذا الكود لكن طريقتك أنت أفضل بمراحل بالطبع..

كود :

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
       On Error Resume Next
       For Each input As HtmlElement In WebBrowser1.Document.GetElementsByTagName("td")
           If input.GetAttribute("width") = ("130") Then
               input.Style = "visibility:hidden;"
           End If
       Next
       For Each input As HtmlElement In WebBrowser1.Document.GetElementsByTagName("td")
           If input.GetAttribute("width") = ("149") Then
               input.Style = "visibility:hidden;"
           End If
       Next
       For Each input As HtmlElement In WebBrowser1.Document.GetElementsByTagName("tbody")
           If input.GetAttribute("className") = ("style7") Then
               input.Style = "visibility:hidden;"
           End If
       Next
       For Each input As HtmlElement In WebBrowser1.Document.GetElementsByTagName("img")
           If input.GetAttribute("src").Contains("twitter.jpg") Then
               input.Style = "visibility:hidden;"
           End If
       Next
       Timer1.Stop()
       WebBrowser1.Visible = True
   End Sub

السؤال الآن هو من أين أتيت بهذا الXpath ؟ أين من أى منطقة داخل الصفحة 

حتى يتسنى لى التعامل مع أى موقع فيما بعد

//table/tbody/tr/td[3]/center/table[2]/tbody/tr[1]