[ابو روضة]

(24-10-19, 11:15 PM)3booody كتب : السلام عليكم ورحمة الله وبركاته

بصراحة ليس لدي معلومات عن Selenium  فلا تؤاخذني أخي لكن اعتقد ان الشرط يتحقق من هنا

كود :

fes.FindElement(By.Name("view_photo"))

جرب وضع الدوت (.) بعد الكود وابحث عن شرط  Boolean
مثال

كود :

If fes.FindElement(By.Name("view_photo")).Desplay = True Then
           Dim dsd As IWebElement = fes.FindElement(By.Name("view_photo"))
           dsd.SendKeys(TextBox4.Text)
       End If

وأعتذر ان كانت مشاركتي بدون فائدة

لا يا أخى بالعكس حضرتك على راسى من فوق والله..

دعك من الكود تبعى ولنعتبره كود يكتب على الليبول اسم عناصر ال CheckedListBox

عنصر تلو الاخر وهناك عنصر لا يوجد له اسم وتريده ان يتخطى توقف البرنامج كيف ستكتبه ؟

وأنا من أعتذر اليك

[3booody]

بارك الله بيك اخي واشكرك على سعة صدرك واسأل الله يوفقك

طبعا لتخطي الشي الفارغ بالاول يجب معرفة  القيمة التي تعود بها الدالة مثل هل يعود بالقيمة String او Integer أو غيرها
اذا كانت دالة طبعا
فسؤالي لوسمحت هل FindElement هي Method او Function
  او هي IwebElement

[ابو روضة]

(24-10-19, 11:43 PM)3booody كتب : بارك الله بيك اخي واشكرك على سعة صدرك واسأل الله يوفقك

طبعا لتخطي الشي الفارغ بالاول يجب معرفة  القيمة التي تعود بها الدالة مثل هل يعود بالقيمة String او Integer أو غيرها
اذا كانت دالة طبعا
فسؤالي لوسمحت هل FindElement هي Method او Function
  او هي IwebElement

هو كود عادى أخى تابع للسيلينام

[3booody]

بما ان  IWebElement يأخذ قيمة FindElement 
جرب احد هالكودين اخي واعذرني فليس لدي مكتبة ال Selenium حتى اجرب الطرق وهذا كل ما استطيع تقديمه لك
لكن في حال ماوجدت رد على سؤالك ارفع الجزء المتعلق بالسؤال بمشروع مع المكتبة وان شاء الله نساعدك لان بصراحة بالمنتدى ماوجدت سابقآ موضوع يتعلق ب ال [b]Selenium لذا اعتقد قليل من لديهم معلومات عنه
[/b]

كود :

If fes.FindElement(By.Name("view_photo")) IsNot Nothing Then
           Dim dsd As IWebElement = fes.FindElement(By.Name("view_photo"))
           dsd.SendKeys(TextBox4.Text)
       End If

او

كود :

Dim dsd As IWebElement = fes.FindElement(By.Name("view_photo"))
       If dsd IsNot Nothing Then
           dsd.SendKeys(TextBox4.Text)
       End If

---

قمت بعمل بحث للIwebElement لفت نظري احدى الخصائص

كود :

Dim dsd As IWebElement = fes.FindElement(By.Name("view_photo"))
       If dsd.Displayed = True Then
           dsd.SendKeys(TextBox4.Text)
       End If

[ابو روضة]

(25-10-19, 01:36 AM)3booody كتب : بما ان  IWebElement يأخذ قيمة FindElement 
جرب احد هالكودين اخي واعذرني فليس لدي مكتبة ال Selenium حتى اجرب الطرق وهذا كل ما استطيع تقديمه لك
لكن في حال ماوجدت رد على سؤالك ارفع الجزء المتعلق بالسؤال بمشروع مع المكتبة وان شاء الله نساعدك لان بصراحة بالمنتدى ماوجدت سابقآ موضوع يتعلق ب ال [b]Selenium لذا اعتقد قليل من لديهم معلومات عنه
[/b]

كود :

If fes.FindElement(By.Name("view_photo")) IsNot Nothing Then
           Dim dsd As IWebElement = fes.FindElement(By.Name("view_photo"))
           dsd.SendKeys(TextBox4.Text)
       End If

او

كود :

Dim dsd As IWebElement = fes.FindElement(By.Name("view_photo"))
       If dsd IsNot Nothing Then
           dsd.SendKeys(TextBox4.Text)
       End If

---

قمت بعمل بحث للIwebElement لفت نظري احدى الخصائص

كود :

Dim dsd As IWebElement = fes.FindElement(By.Name("view_photo"))
       If dsd.Displayed = True Then
           dsd.SendKeys(TextBox4.Text)
       End If

تسلم استاذى الكريم ربنا يكرمك يارب....

واضح فعلا أن هذه المكتبة غير معروفة كثيرا هنا..

الله المستعان واعتذر لك تعبتك معايا