مرحبًا في المعهد العربي للبرمجة


المعهد العربي للبرمجة

المعهد العربي للبرمجة
 
الرئيسيةالرئيسية  بحـثبحـث  التسجيلالتسجيل  دخولدخول  
.:عدد مشاهدات المعهد العربي للبرمجة:.
Flag Counter
من تاريخ 2016.9.11

مطلوب مشرفين للعمل بالمنتدى للانظمام ضع طلبك بالقسم المناسب شاكرين لكم حسن تعاونكم
مرحبا بك يا زائر نتمنى لك كل التوفيق

المواضيع الأكثر نشاطاً
اكواد Html متحركة
اكواد جاهزه / كلاسات / فنكشن / تعبير قياسية
طلب برجمة لمكتبة هاكات
اريد الانضمام الى فريق المنتدى
تعلم سي شارب من الصفر حتى الإحتراف
برنامج ساعة رائع ومتطور
سؤال : كيفية عمل برنامج نشر تلقائي في الجروبات (فيسبوك)
اكواد php جاهزة
كيفية رفع الملفات باستعمال PHP
لعبة صيد للأندرويد
أفضل 10 أعضاء في هذا الأسبوع
المواضيع الأكثر شعبية
اكواد php جاهزة
تحميل برنامج Microsoft Small Basic برابط مباشر و سريع
كتاب احتراف Microsoft Office Access بسرعة
اكواد جاهزه / كلاسات / فنكشن / تعبير قياسية
تعلم vb.net من الصفر الى الاحتراف
الآن على المعهد العربي : شاركنا بأحلى مساهمات واحصل على أحلى الهدايا
تعلم سي شارب من الصفر حتى الإحتراف
اكواد Html متحركة
سورس كود متصفح متطور vb.net
اريد الانضمام الى فريق المنتدى
المتواجدون الآن ؟
ككل هناك 4 عُضو متصل حالياً :: 0 عضو مُسجل, 0 عُضو مُختفي و 4 زائر :: 1 روبوت الفهرسة في محركات البحث

لا أحد

أكبر عدد للأعضاء المتواجدين في هذا المنتدى في نفس الوقت كان 47 بتاريخ الأربعاء أكتوبر 05, 2016 5:06 pm

شاطر | 
 

 WebBrowser في VB.NET

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
Basil Abdallah
مؤسس المنتدى
مؤسس المنتدى
avatar

أخضر
ذكر عدد المساهمات : 884
السٌّمعَة : 1007
تاريخ التسجيل : 15/02/2013

مُساهمةموضوع: WebBrowser في VB.NET   الثلاثاء سبتمبر 27, 2016 7:57 pm


اولاً : التعريف :

WebBrowser هي اداة تعمل عمل اي متصفح و بالاخص مثل المتصفح الشهير Internet Explorer
فهي تساعدك في تصفح المواقع من ناحية و التحكم في اكوادها HTML وكل ما يرتبط بها من ادخال و استخراج بيانات من ناحية اخرى.
واليكم هذا بالتفصيل >>


ثانياً : اهم الخصائص:

Name : اسم الاداة و الاسم الافتراضي هو 1 WebBrowser .

AllowNavigation : السماح للتصفح داخل الاداة وبها اختيارين :-
-True : السماح بالتصفح وهو الافتراضي .
-False : عدم السماح بالتصفح .

Dock : مكان الاداة و الازاحة الخاصه بها اي بمعنى مكان وجود الاداة في البرنامج دائما ثابته في الاعلى ام الاسفل ام اليسار ام اليمين ام الوسط ام حره (None).

Location : مكان الخاص بالاداة داخل البرنامج تبعا لخطوط الطول و العرض الموجوده داخل البرنامج
وهذه الخاصية لا تعمل الا اذا كانت الاداة حره في الخاصية Dock وبها حقلين :-
-X : المكان بالنسبه لخطوط العرض .
-Y : المكان بالنسبه لخطوط الطول .
-Locked : عدم تحريك الاداة ابدا من مكانها و بداخلها اختيارين :-
--True : تفعيل عدم تحريك الاداة ابدا .
--False : السماح بتحريك الاداة من مكانها .

Margin : الابتعاد عن الحواف وبها 4 حقول :-
-All : مقاس الابتعاد عن الحواف من جميع الجهات .
-Left : مقاس الابتعاد عن الحواف من جهة اليسار .
-Top : مقاس الابتعاد عن الحواف من الاعلى .
-Right : مقاس الابتعاد عن الحواف من جهة اليمين .
-Bottom : مقاس الابتعاد عن الحواف من الاسفل .

MaximumSize : الحد الاقصى لحجم الاداة وبها حقلين :-
-Width : مقاس العرض .
-Height : مقاس الطول .

MinimumSize : الحد الادنى لحجم الاداة و بها حقلين :-
-Width : مقاس العرض .
-Height : مقاس الطول .

ScrollBarsEnabled : خاصة بتفعيل شريط التمرير و بها حلقين :-
-True : السماح بتفعيل الشريط التمرير .
-False : عدم السماح بتفعيل الشريط التمرير .

Size : الحجم الحالي للاداة وبها اختيارين :-
-Width : مقاس العرض .
-Height : مقاس الطول.

TabStop : ايقاف استخدام زر Tab للتنقل داخل الاداة وبها اختيارين :-
-True : ايقاف تفعيل استخدام زر Tab .
-False : تفعيل استخدام زر Tab .

Url : رابط الموقع و لكن يجب اضافة //:http في بداية الرابط .

Visible : حالة الاداة من ناحية الظهور وبها اختيارين :--
-True : ظهور الاداة امام المستخدم .
-False : عدم ظهور الاداة اما المستخدم .


ثالثاً : اهم الاحداث(التصريحات) :

CanGoBackChanged : هذا الحدث خاص بحالة قدرة الاداة لتنفيذ امر الرجوع للصفحة السابقة ام لا ويمكن ايضا ان نستخدمها في تفعيل زر الرجوع او ايقافه .

CanGoForwardChanged : هذا الحدث خاص بحالة قدرة الاداة لتنفيذ امر الانتقال للامام (اي الصفحة التالية التي تم زيارتها من قبل) ام لا ويمكن ايضا ان نستخدمها في تفعيل زر الانتقال للامام او ايقافه .

DocumentCompleted : هذا الحدث خاص بما يحدث عندما تقوم الاداة باتمام فتح صفحة ما (اي تنفيذ اوامر عند الانتهاء من تحميل اي صفحة) .

DocumentTitleChanged : هذا الحدث خاص بما يحدث عندما يتغير عنوان الصفحة .
ملاحظة : عنوان الصفحة لمن لا يعرفه هو النص الذي يظهر في اعلى اي متصفح باسم الموقع ويكون موجود هذا النص داخل اكواد HTML الخاصة بالموقع داخل عنصر title على سبيل المثال : هنا العنوان .<br /><br />Navigating : هذا الحدث خاص بما يحدث اثناء قيام الاداة بتحميل صفحة ما .<br /><br />ProgressChanged : هذا الحدث خاص بمعرفة قيمة التغير(التحميل) الحادث اثناء تحميل اي صفحة .<br /><br />StatusTextChanged : هذا الحدث خاص بمعرفة النص الخاص بحالة التصفح مثل تحميل صفحة ما او الانتهاء من تحميلها او عند الوقوف على رابط يظهر الرابط .<br /><br /><br /><u>رابعاً : اهم الاكواد (هناك مثال مرفق به تطبيق شامل لكل هذه الخصائص و الاحداث و الاكواد)</u><br /><br />اولاً : اكواد التصفح :-<br /><br />فتح صفحة موقع<br /></strong></span><span style="font-size: 14px; line-height: normal">[/b]</span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">WebBrowser1.Navigate("رابط الصفحة كامل")</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />فتح صفحة فارغة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">WebBrowser1.Navigate("about:blank")</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الرجوع للصفحة السابقة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">WebBrowser1.GoBack()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الانتقال للصفحة التالية<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">WebBrowser1.GoForward()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />اعادة تحميل الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">WebBrowser1.Refresh()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />ايقاف تحميل الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">WebBrowser1.Stop()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br /><br /><br />ثانياً : اكواد النوافذ الملحقة بالاداة :-<br /><br />حفظ الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.ShowSaveAsDialog()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />معاينة الصفحة قبل الطباعة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.ShowPrintPreviewDialog()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />طباعة الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.ShowPrintDialog()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />خصائص الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.ShowPropertiesDialog()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />تنسيق الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.ShowPageSetupDialog()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />رسالة تنبيه<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.Window.Alert("نص الرسالة")</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />فتح نافذة جديدة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Dim url As String = WebBrowser1.Document.Url.ToString<br />Dim frm As New Form1<br />frm.Show()<br />frm.WebBrowser1.Navigate(url)</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br /><br />رقم اصدار الاداة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">MsgBox(WebBrowser1.Version.ToString)</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br /><br /><u>خامساً : التعاملات النصية :-</u><br />قص النص المحدد<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.ExecCommand("cut", True, DBNull.Value)</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />نسخ النص المحدد<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.ExecCommand("copy", True, DBNull.Value)</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />لصق النص في المكان المُفعل<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.ExecCommand("paste", True, DBNull.Value)</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />البحث داخل نصوص الاداة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Dim data As DataObject = Clipboard.GetDataObject 'الاحتفاظ بما تم نسخة <br />Form1.WebBrowser1.Document.ExecCommand("Copy", False, Nothing)<br />Form1.WebBrowser1.Focus()<br />SendKeys.SendWait("^f")<br />Clipboard.SetDataObject(data) 'ارجاع ما تم نسخة قبل عملية البحث</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br /><br /><u>سادساً : التعامل مع محتوى الصفحة :-</u><br /><br />اولاً : التعاملات العامة :-<br /><br />استخراج نص الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form2.Text = "WebBrowser Get TEXT"<br />Form2.RichTextBox1.Text = WebBrowser1.Document.Body.InnerText<br />Form2.Show()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />استخراج اكواد الصفحة<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form2.Text = "WebBrowser Get HTML"<br />Form2.RichTextBox1.Text = WebBrowser1.Document.GetElementsByTagName("HTML").Item(0).OuterHtml        <br />Form2.Show()</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />تحويل الصفحة الى نص<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.Body.InnerText = RichTextBox1.Text</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />تحويل الصفحة الى اكواد او نص<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.Body.InnerHtml = RichTextBox1.Text</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />ثانياً : التعاملات الخاصة بعناصر الصفحة :-<br /><br /><br />اولاً : GetElementById <br /><br />الاستخراج<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">MsgBox(Form1.WebBrowser1.Document.GetElementById(رقم الاي دي).GetAttribute(اسم المطلوب محتواه))</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الارسال<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.GetElementById(رقم الاي دي).SetAttribute(اسم المرسل اليه,النص المرسل)</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الضغط <br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.GetElementById(رقم الاي دي).InvokeMember("click")</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br /><br /><br />ثانياً : GetElementsByTagName<br /><br />الاستخراج<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">If (Form1.WebBrowser1.Document IsNot Nothing) Then<br />           Dim Elems As HtmlElementCollection<br />           Dim WebOC As Windows.Forms.WebBrowser = Form1.WebBrowser1<br /><br />           Elems = WebOC.Document.GetElementsByTagName(Tag اسم)<br /><br />           For Each elem As HtmlElement In Elems<br />               Dim NameStr As String = elem.GetAttribute(اسم عنصر الاثبات)<br />               If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then<br />                   If NameStr.ToLower().Equals(محتوى عنصر الاثبات) Then<br />                       Dim ContentStr As String = elem.GetAttribute(اسم القيمة المطلوبة)<br />                       MessageBox.Show(ContentStr)<br />                   End If<br />               End If<br />           Next<br />       End If</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الارسال<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">If (Form1.WebBrowser1.Document IsNot Nothing) Then<br />           Dim Elems As HtmlElementCollection<br />           Dim WebOC As Windows.Forms.WebBrowser = Form1.WebBrowser1<br /><br />           Elems = WebOC.Document.GetElementsByTagName(Tag اسم)<br /><br />           For Each elem As HtmlElement In Elems<br />               Dim NameStr As String = elem.GetAttribute(اسم عنصر الاثبات)<br />               If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then<br />                   If NameStr.ToLower().Equals(محتوى عنصر الاثبات) Then<br />                       elem.SetAttribute(اسم المرسل اليه, النص المرسل)<br />                   End If<br />               End If<br />           Next<br />       End If</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الضغط<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">If (Form1.WebBrowser1.Document IsNot Nothing) Then<br />           Dim Elems As HtmlElementCollection<br />           Dim WebOC As Windows.Forms.WebBrowser = Form1.WebBrowser1<br /><br />           Elems = WebOC.Document.GetElementsByTagName(Tag اسم)<br /><br />           For Each elem As HtmlElement In Elems<br />               Dim NameStr As String = elem.GetAttribute(اسم عنصر الاثبات)<br />               If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then<br />                   If NameStr.ToLower().Equals(محتوى عنصر الاثبات) Then<br />                       elem.InvokeMember("click")<br /><br />                   End If<br />               End If<br />           Next<br />       End If</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />ثالثا : All<br /><br />الاستخراج<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">MsgBox(Form1.WebBrowser1.Document.All().Item(CInt(الرقم التسلسلي للعنصر او الاي دي)).InnerHtml)</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الارسال<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.All().Item(CInt(الرقم التسلسلي للعنصر او الاي دي)).InnerHtml = "النص"</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />الضغط<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Form1.WebBrowser1.Document.All().Item(CInt(الرقم التسلسلي للعنصر او الاي دي)).InvokeMember("click")</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br /><br /><u>سابعاً : تطبيقات على الاحداث (التصريحات)</u><br /><br />CanGoBackChanged<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">If WebBrowser1.CanGoBack Then 'ان كانت الاداة قادرة على الرجوع للخلف<br />           Button1.Enabled = True ' تفعيل زر الرجوع للخلف<br />       Else 'وان كانت غير قادرة<br />           Button1.Enabled = False 'عدم تفعيل زر الرجوع للخلف<br />       End If</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />CanGoForwardChanged<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">If WebBrowser1.CanGoForward Then 'ان كانت الاداة قادرة على الانتقال الى الصفحة التالية<br />           Button2.Enabled = True ' تفعيل زر الانتقال<br />       Else 'وان كانت غير قادرة<br />           Button2.Enabled = False 'عدم تفعيل زر الانتقال<br />       End If</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />DocumentCompleted<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">TextBox1.Text = WebBrowser1.Url.ToString 'اظهار رابط الصفحة<br /><br />       Button3.Enabled = True 'تفعيل زر اعادة التحميل<br />       Button4.Enabled = False 'الغاء تفعيل زر ايقاف تحميل الصفحة</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />DocumentTitleChanged<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">title.Text = "TiTle : " & WebBrowser1.DocumentTitle ' عنوان الصفحة</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />Navigating<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">Button3.Enabled = False 'الغاء تفعيل زر اعادة تحميل الصفحة<br />Button4.Enabled = True 'تفعيل زر ايقاف تحميل الصفحة</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br />ProgressChanged<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">ToolStripProgressBar1.Maximum = e.MaximumProgress ' تساوي اعلى قيمة انتهاء تحميل الصفحة ToolStripProgressBar1 جعل اعلى قيمة لاداة  <br />ToolStripProgressBar1.Value = e.CurrentProgress ' تساوي قيمة التحميل الحالية ToolStripProgressBar1 جعل القيمة الحالية لاداة</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong> <br />StatusTextChanged<br /></strong></strong></span><br /><br /><br /><div align="right"><span style="font-size: 14px; line-height: normal"><strong>كود :</strong><br /></span><dl class="codebox"><dt><span class="genmed"><b>الكود:</b></dt><dd class="code"><div class="cont_code">ToolStripLabel1.Text = WebBrowser1.StatusText ' يساوي نص الحالة الخاصة بالاداة  ToolStripLabel1 جعل نص</div></dd></dl></div><span style="font-size: 14px; line-height: normal"><strong><strong><br /><br /><br />تم بحمد الله<br />المثال موجود بالمرفقات به تطبيق لكل هذه الاكواد<br /><br />وان كان هناك اي تعقيب او مناقشة انا متواجد ان شاء الله</strong></strong></span><strong><br /><font color="#333333"><font face="Droid Arabic Naskh, Lucida Grande, Tahoma, Trebuchet MS, Verdana, Arial, sans-serif"><span style="font-size: 14px; line-height: normal"><strong>منقووول</strong></span></font></font><br /></strong></div><div class="clear"></div><div class="signature_div"><br /><center>_________________</center><br /><div align="center"><strong><span style="font-size: 24px; line-height: normal"><font color="#ff0000">مرحبا بك يا </font></span><span style="font-size: 24px; line-height: normal"><font color="#330099">زائر  <img src="https://imgfast.net/users/1617/26/89/58/smiles/3528284923.gif" alt="" longdesc="32" /> </font></span></strong></div><div align="center"><span style="font-size: 24px; line-height: normal"><strong><img src="https://imgfast.net/users/1617/26/89/58/smiles/1894645344.gif" alt="3456" longdesc="3" /> <br /></strong></span></div><div align="center"><span style="font-size: 24px; line-height: normal"><strong><img src="https://imgfast.net/users/1617/26/89/58/smiles/3993931644.gif" alt="930848" longdesc="27" /> </strong><br /></span></div></div></div><span class="gensmall"></span></td></tr></table></td></tr><tr class="post--209" style=""><td class="row1 browse-arrows" align="center" valign="middle" width="150"><a href="#top"><img src="https://illiweb.com/fa/fdf3/up11.png" alt="الرجوع الى أعلى الصفحة" /></a> <a href="#bottom"><img src="https://illiweb.com/fa/fdf3/down11.png" alt="اذهب الى الأسفل" /></a></td><td class="row1 messaging gensmall" width="100%" height="28"><table border="0" cellspacing="0" cellpadding="0"><tr><td valign="middle"> </td></tr></table></td></tr><tr align="right"><td class="catBottom" colspan="2" height="28"><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td width="9%" class="noprint"> </td><td align="center" class="t-title"><a name="bottomtitle"></a><div class="cattitle">WebBrowser في VB.NET</div></td><td align="right" nowrap="nowrap" width="9%" class="browse-arrows"><a href="/t38p-topic"><img src="https://illiweb.com/fa/fdf3/left10.png" alt="استعرض الموضوع السابق" /></a> <a href="/t38n-topic"><img src="https://illiweb.com/fa/fdf3/right10.png" alt="استعرض الموضوع التالي" /></a> <a href="#top"><img src="https://illiweb.com/fa/fdf3/up11.png" alt="الرجوع الى أعلى الصفحة" /></a> </td></tr></table></td></tr></table><table class="forumline noprint" width="100%" border="0" cellspacing="0" cellpadding="0" style="margin: 0 0 1px 0; border-top: 0px;"><tr><td class="row2" valign="top" colspan="2" width="150"><span class="gensmall">صفحة <strong>1</strong> من اصل <strong>1</strong></span></td></tr></table><table class="forumline noprint" width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td class="row2" colspan="2" align="center" style="padding:0px"><a name="quickreply"></a><br /></td></tr><tr><td style="margin:0; padding: 0;" colspan="2"><table border="0" cellpadding="0" width="100%" cellspacing="0" id="info_open" style="display:''"><tbody><tr><td class="row2" valign="top" width="25%"><span class="gensmall"><strong>صلاحيات هذا المنتدى:</strong></span></td><td class="row1" valign="top" width="75%"><span class="gensmall"><strong>لاتستطيع</strong> الرد على المواضيع في هذا المنتدى<br /></span></td></tr><tr><td class="catBottom" colspan="2" height="28"><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td valign="middle" width="100%"><span class="nav"><a class="nav" href="/">المعهد العربي للبرمجة</a><a class="nav" href=""></a> :: <a href="/c3-category" class="nav"><span>VB.NET</span></a> :: <a href="/f2-montada" class="nav"><span>VB.NET</span></a></span></td><td align="right" valign="middle"><span class="gensmall"><a href="javascript:ShowHideLayer('info_open','info_close');"><img src="https://illiweb.com/fa/fdf3/moins10.png" alt="-" align="middle" border="0" /></a></span></td></tr></table></td></tr></tbody></table></td></tr><tr><td style="margin:0; padding: 0;" colspan="2"><table border="0" cellpadding="0" cellspacing="0" width="100%" id="info_close" style="display:none;"><tbody><tr><td class="catBottom" colspan="2" height="28"><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td valign="middle" width="100%"><span class="nav"><a class="nav" href="/">المعهد العربي للبرمجة</a><a class="nav" href=""></a> :: <a href="/c3-category" class="nav"><span>VB.NET</span></a> :: <a href="/f2-montada" class="nav"><span>VB.NET</span></a></span></td><td align="right" valign="middle"><span class="gensmall"><a href="javascript:ShowHideLayer('info_open','info_close');"><img src="https://illiweb.com/fa/fdf3/plus10.png" alt="+" align="middle" border="0" /></a></span></td></tr></table></td></tr></tbody></table></td></tr></table><form action="/viewforum" method="get" name="jumpbox" onsubmit="if(document.jumpbox.f.value == -1){return false;}"><table class="noprint" width="100%" border="0" cellspacing="2" cellpadding="0" align="center"><tr><td align="left" valign="middle" nowrap="nowrap" ><span class="nav"></span></td><td align="right" nowrap="nowrap"><span class="gensmall">انتقل الى: <select name="selected_id" onchange="if(this.options[this.selectedIndex].value != -1){ forms['jumpbox'].submit() }"><option value="-1">اختر منتدى</option><option value="-1"></option><option value="-1">|</option><option txt="foro" value="c1">|--اداريات</option><option txt="foro" value="f7">|   |--اخر الاخبار و الاعلانات الاداريه</option><option value="-1">|   </option><option txt="foro" value="c2">|--#C</option><option txt="foro" value="f5">|   |--#C</option><option value="-1">|   </option><option txt="foro" value="c3">|--VB.NET</option><option txt="foro" value="f2">|   |--VB.NET</option><option value="-1">|   </option><option txt="foro" value="c10">|--Small Basic</option><option txt="foro" value="f26">|   |--Small Basic</option><option value="-1">|   </option><option txt="foro" value="c4">|--قواعد بيانات</option><option txt="foro" value="f8">|   |--Microsoft Office Access</option><option txt="foro" value="f9">|   |--Microsoft SQL Server</option><option value="-1">|   </option><option txt="foro" value="c8">|--المنتدى العام</option><option txt="foro" value="f1">|   |--اليوتيوب و مقاطع الفيديو</option><option txt="foro" value="f3">|   |--الألعاب الكاتبية</option><option txt="foro" value="f6">|   |--اخبار العالم و الجرائد</option><option txt="foro" value="f4">|   |--القسم الاسري</option><option txt="foro" value="f16">|   |--قسم التكنلوجيا و الملتيميديا</option><option txt="foro" value="f17">|   |--القسم الاسلامي العام</option><option txt="foro" value="f19">|   |--الترحيب و التهانى و الإهداءات</option><option txt="foro" value="f20">|   |--القسم الادبي العام</option><option txt="foro" value="f21">|   |--ثقافات الدول العربية و حضاراتها</option><option value="-1">|   </option><option txt="foro" value="c13">|--مواقع ويب</option><option txt="foro" value="f44">|   |--Html</option><option txt="foro" value="f45">|   |--php</option><option value="-1">|   </option><option txt="foro" value="c12">|--المكتبات</option><option txt="foro" value="f37">|   |--مكتبة الخلفيات</option><option txt="foro" value="f38">|   |--مكتبة التاثيرات الصوتية</option><option txt="foro" value="f39">|   |--مكتبة الازرار</option><option txt="foro" value="f40">|   |--مكتبة الثيمات</option><option txt="foro" value="f41">|   |--مكتبة الايقونات</option><option txt="foro" value="f42">|   |--مكتبة الصور الاخرى</option><option txt="foro" value="f43">|   |--مكتبة الخطوط</option><option value="-1">|   </option><option txt="foro" value="c7">|--اخرى</option><option txt="foro" value="f15">|   |--شروحات اخرى</option><option txt="foro" value="f47">|   |--مواضيع اخرى</option><option value="-1">|   </option><option txt="foro" value="c14">|--الدعم</option><option txt="foro" value="f50">|   |--دعم منتديات احلى منتدى</option><option txt="foro" value="f53">|   |--دعم منتيات الـVB</option><option txt="foro" value="f54">|   |--ما يهم المبرمج</option><option txt="foro" value="f29">|       |--برامج المعهد العربي</option><option txt="foro" value="f22">|       |--مكتبة السورسات</option><option txt="foro" value="f23">|       |--طلبات البرمجة</option><option txt="foro" value="f49">|       |--فحص البرامج</option><option value="-1">|   </option><option txt="foro" value="c5">|--المكتب الاداري</option><option txt="foro" value="f10">    |--الاقتراحات</option><option txt="foro" value="f11">    |--الشكاوي</option><option txt="foro" value="f12">    |--طلبات تغيير الاسماء</option><option txt="foro" value="f13">    |--طلبات الانضمام للفريق</option></select><input type="hidden" name="tid" value="8006408708517a44e9800998ecf8427e" /> <input class="liteoption" type="submit" value="انتقل الى" /></span></td></tr></table></form><script src="//s7.addthis.com/js/300/addthis_widget.js#pubid=forumotion" type="text/javascript"></script><table class="forumline 6524" width="100%" border="0" cellspacing="1" cellpadding="0"><tr><td style="background:#f0f0f0;padding:inherit 0"><table width="100%" cellspacing="1" cellpadding="1" border="0" style="background:#f0f0f0"><tr><td><div align="center"> <div style="text-align:center; display:inline-block; margin:0 auto;"> <table border="0" cellspacing="0" cellpadding="0" style="padding:0; margin:0; border:none;"> <tbody> <tr> <td valign="top" style="padding:32px 32px;"><script data-cfasync="false" type="text/javascript" src="https://www.superadexchange.com/a/display.php?r=968463"></script></td> <td valign="top" style="padding:32px 32px;"><script data-cfasync="false" type="text/javascript" src="https://www.superadexchange.com/a/display.php?r=968463"></script></td> </tr> </tbody> </table> </div></div></td></tr></table></td></tr></table><div style="height:3px"></div></td><td valign="top" width="0"><div id="emptyidright"></div></td></tr></tbody></table></div></div><!-- close div id="page-body" --><div id="page-footer"><div align="center"><div class="gen"><span class="gensmall">©</span> <a href="https://www.ahlamontada.com/phpbb" target="_blank">phpBB</a> | <strong><a href="http://www.ahlamontada.com/create-a-forum" target="_blank">انشاء منتدى مع أحلى منتدى</a></strong> | <a name="bottom" href="http://help.ahlamontada.com/" target="_blank">منتدى مجاني للدعم و المساعدة</a> | <a name="bottom" href="/contact" rel="nofollow">إتصل بنا</a> | <a href="/abuse?page=%2Ft38-topic&report=1" rel="nofollow">التبليغ عن محتوى مخالف</a> | <strong><a href="http://www.ahlablog.com" target="_blank">انشئ مدونة</a></strong></div></div></div></td></tr></table></div></div></div><form action="/" method="get" style="clear:right"><table cellpadding="6" cellspacing="0" border="0" width="100%" class="page" align="center"><tr><td class="tfoot"><select name="styleid" onchange="switch_id(this, 'style')"><optgroup label="اختيار التصميم السريع"><option value="1" class="" >-- الاستايل الافتراضي</option></optgroup></select></td><td class="tfoot" align="left" width="100%"><div class="smallfont"><strong><a href="sendmessage.php" rel="nofollow" accesskey="9">اتصل بنا</a> -<a href="http://www.elnooronline.com">المعهد العربي للبرمجة</a> -<a href="archive/index.php">الأرشيف</a> -<a href="#top" onclick="self.scrollTo(0, 0); return false;">الأعلى</a></strong></div></td></tr></table><br /><div align="center"><div class="smallfont" align="center"><!-- Do not remove this copyright notice -->Powered by vBulletin™ Version 3.8.7 <br />Copyright © 2016 vBulletin Solutions, Inc. All rights reserved. <a href="http://www.bdr130.net/vb/"> <img border="0" src="./images/diamond.png" width="45" height="8" alt="منتديات"></a><!-- Do not remove this copyright notice --></div><div class="smallfont" align="center"><!-- Do not remove cronimage or your scheduled tasks will cease to function --><img src="http://www.elnooronline.com/vbskaka/forum/cron.php?rand=1481347278" alt="" width="1" height="1" border="0" /><!-- Do not remove cronimage or your scheduled tasks will cease to function --></div></div><span class="clr" style="height:14px"><!-- --></span> </div></div><div id="foot_"><div class="cntr"><div class="left-logo-"><a href="/" class="hdr-logo" title="الصفحة الرئيسيه"></a> <ul class="social-butt"><li><a href="https://www.youtube.com/channel/UCX6EKd2-tzVRQsSlsdvCePA" title="تابعنا علي يوتيوب"></a></li> <li class="ic02"><a href="#" title="تابعنا علي انستقرام"></a></li><li class="ic03"><a href="#" title="تابعنا علي تويتر"></a></li><li><a href="https://www.facebook.com/groups/627733707386167/?ref=bookmarks" title="تابعنا علي فيس بوك"></a></li></ul></div><div class="fot-cont"><div class="fmenu_"><ul><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li></ul><ul><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li></ul><ul><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li></ul></div><div class="fmenu_"><ul><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li></ul><ul><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li></ul><ul><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li><li><a href="#">رابط نصي</a></li></ul></div></div><span class="clr"><!-- --></span></div></div><div id="footbar"><div class="cntr"><span class="coprt">جميع الحقوق محفوظة</span><a href="http://elnooronline.com/" class="des-coprt" title="تصميم النور اون لاين لخدمات الويب المتكاملة" target="_blank"><span>تصميم النور اونلاين لخدمات الويب المتكاملة</span></a><span class="clr"><!-- --></span></div></div><a href="#" class="scrollup"></a><script type="text/javascript">//<![CDATA[ fa_endpage();//]]></script><script type="text/javascript"> var vglnk = { api_url: '//api.viglink.com/api', key: '74bad24252620514d1244cfba01f2ee2' }; (function(d, t) { var s = d.createElement(t); s.type = 'text/javascript'; s.async = true; s.src = ('https:' == document.location.protocol ? vglnk.api_url : '//cdn.viglink.com/api') + '/vglnk.js'; var r = d.getElementsByTagName(t)[0]; r.parentNode.insertBefore(s, r); }(document, 'script')); </script><script type="text/javascript"> document.write('<scr' + 'ipt data-cfasync="false" type="text/javascript" src="http://www.superadexchange.com/a/display.php?r=1615687"></scr' + 'ipt>'); </script></body></html>