[ابو روضة]

السلام عليكم اخوتى..
اريد التأكد لو كنت مسجل بموقع ما أم لا فلو كنت مسجل مسبقا
يغلق فورم الدخول ويفتح الفورم الاخر لآنى عامل 2 فورم واحد للدخول والاخر للتصفح العادى
انا جربت هذا فى حدث   WebBrowser1_DocumentCompleted بتاع الويب براوزر لكن لو مش مسجل بسجل لكن بعد التسجيل مش بيغلق الفورم  بل لابد وان اغلقه وافتحه مرة اخرى وانا اريده لو تم التسجيل يغلق هذا ويفتح الاخر

كود :

If WebBrowser1.DocumentText.Contains("تسجيل الخروج") Then
           Form2.Show()
           Me.Close()
       Else
           Me.Text = ("يجب تسجيل الدخول")
       End If

[ابو روضة]

او حتى ممكن شرح بالتفصيل لهذا الكود أول سطر تحديدا

كود :

If WebBrowser1.Document.GetElementById("mbasic_logout_button") IsNot Nothing Then

           Form1.Show()

           Me.Close()

       Else

           Me.Text = ("يجب تسجيل الدخول")

       End

وخصوصا هذه الجملة IsNot Nothing

[Basil Abdallah]

If WebBrowser1.Document.GetElementById("mbasic_logout_button") IsNot Nothing Then

هنا نحنا نسال البرنامج ونقول له اذا كان نص الـhtml لصفحة الويب لا يحتوي على زر قيمة الـid له = mbasic_logout_button

Form1.Show()

Me.Close()
اذا لم يتحقق الشرط ولم يجد البرنامج الاي دي في صفحة الويب يفتح الفورم الاول ويغلق الفورم الحالي

---

اعطيني رابط الموقع

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

[ابو روضة]

(21-07-19, 04:51 AM)Basil Abdallah كتب : If WebBrowser1.Document.GetElementById("mbasic_logout_button") IsNot Nothing Then

هنا نحنا نسال البرنامج ونقول له اذا كان نص الـhtml لصفحة الويب لا يحتوي على زر قيمة الـid له = mbasic_logout_button

          Form1.Show()

          Me.Close()
اذا لم يتحقق الشرط ولم يجد البرنامج الاي دي في صفحة الويب يفتح الفورم الاول ويغلق الفورم الحالي

---

اعطيني رابط الموقع

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

كل الشكر والتقدير لك أخى الكريم فعلا انا كنت ناسييها والله " لا تحتوى " هذا فعلا معناها

وهذا فقط ما كنت اريد معرفته وجزاك الله كل الخير أخى.

لكن نفترض بدلا من كلمة لا تحتوى اريد كتابة نفس الكود بيحتوى فكيف يكون هذا ؟

يعنى اذا كانت هذه الصفحة تحتوى على نص معين

لآنى لما حذفت كلمة IsNot Nothing حدث خطأ فى الكود

[Basil Abdallah]

اعتقد هكذا يصبح الكود
If WebBrowser1.Document.GetElementById("mbasic_logout_button").OuterHtml Then


End If

[ابو روضة]

(21-07-19, 01:43 PM)Basil Abdallah كتب : اعتقد هكذا يصبح الكود
 If WebBrowser1.Document.GetElementById("mbasic_logout_button").OuterHtml Then


       End If

وماذا تعنى هذه OuterHtml ؟
اعتقد والله اعلى وأعلم ستكون هكذا

كود :

 If WebBrowser1.DocumentText.Contains("تسجيل الدخول") Then

[Basil Abdallah]

OuterHtml معناها في نص الـhtml الخاص بالصفحة

If WebBrowser1.DocumentText.Contains("تسجيل الدخول") Then
حقيقتا لا اعلم فالكود يبنى على معطيات عدة ..
ولكن انا لا انصح باستعمال هذه الطريقة فهنا البرنامج رح يصيبه ثغرة خطأ برمجي
فاي شخص يستطيع ان ينشر موضوع او مقال في الموقع المطلوب بعنوان ("تسجيل الدخول") مثلا والعضو قام اساسا بتسجيل الدخول
فيشق على البرنامج تحديد الامر المناسب

لذلك انصح بـID صندوق تسحيل الدخول او لزر تسجيل الدخول

[ابو روضة]

(21-07-19, 02:02 PM)Basil Abdallah كتب : OuterHtml معناها في نص الـhtml الخاص بالصفحة

If WebBrowser1.DocumentText.Contains("تسجيل الدخول") Then
حقيقتا لا اعلم فالكود يبنى على معطيات عدة ..
ولكن انا لا انصح باستعمال هذه الطريقة فهنا البرنامج رح يصيبه ثغرة خطأ برمجي
فاي شخص يستطيع ان ينشر موضوع او مقال في الموقع المطلوب بعنوان ("تسجيل الدخول") مثلا والعضو قام اساسا بتسجيل الدخول
فيشق على البرنامج تحديد الامر المناسب

لذلك انصح بـID صندوق تسحيل الدخول او لزر تسجيل الدخول

كلامك صحيح أخى وموزون بارك الله فيك