تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف اعرف الرابط من خلال الحدث WebBrowser1_NewWindow
#1
السلام عليكم ورحمة الله وبركاته
كما يعلم الكثير يوجد حدث NewWindow
كيف اسند رابط للنافذة بالكود
PHP كود :
       e.Cancel True
        Dim t 
As New TabPage
        Dim newtab 
As New Tab
        newtab
.Show()
 
       newtab.TopLevel False
        newtab
.Dock DockStyle.Fill
        t
.Controls.Add(newtab)
 
       Form1.TabControl1.TabPages.Add(t)
 
       newtab.WebBrowser1.Navigate("www.vb4arb.com"
طبعا الرابط كتبته كتجربة فقط اود اقتناص الرابط واضعه بدل المكتوب
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#2
يا سعود،

أنا وقفت عند Dim newtab As New Tab ما هو ال Tab أكيد ليس TabPage
الرد }}}}
تم الشكر بواسطة:
#3
هذا فورم عادي لكن قمت بتعديل البوردر كنت اطبق شرح باليوتيوب How to make a advanced web browser in visual basic - YouTube
حاولت اجيب الرابط لكن ماحصلته بالضبط

هذا هو
https://www.youtube.com/watch?v=oLvHlyyjZSM
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#4
يا سعود،

أول ما شغلت الفيديو  وبدا يهرج انفجعت حسبت اني في طيرة والكابتن قاعد يهرج.  Sad

عموماً، هذا معقد المسألة لو استخدم UserControl أحسن له.

لكن الموضوع ما هو معقد لهذه الدرجة.
الرد }}}}
تم الشكر بواسطة:
#5
الطريقة سهلة وتم بشكل جيد لكن الجزئية ماتطرق لها اساسا لكن انت سالت عن Tab وكتبت الرابط
وجدت طريقة لكنها لاتنجح  بكل الاحوال يعني مرة تنجح و مرة  تفشل

كود :
       e.Cancel = True
       Dim t As New TabPage
       Dim newtab As New Tab
       newtab.Show()
       newtab.TopLevel = False
       newtab.Dock = DockStyle.Fill
       t.Controls.Add(newtab)
       Form1.TabControl1.TabPages.Add(t)
       Dim myelement As HtmlElement = WebBrowser1.Document.ActiveElement
       Dim target As String = myelement.GetAttribute("href")
       newtab.WebBrowser1.Navigate(target)
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#6
يا سعود،

هل تقصد عند الضغظ على رابط يفتح في نافذة جديدة؟
الرد }}}}
تم الشكر بواسطة:
#7
(28-06-16, 07:33 AM)الوادي كتب : يا سعود،

هل تقصد عند الضغظ على رابط يفتح في نافذة جديدة؟

هو اصلا يفتح بنافذة جديدة للمستعرض المنفصل  وهذا الكود e.Cancel = True يلغي هذا الاجراء واود فتح الرابط بتبويبة جديدة
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#8
يا سعود،

تفضل هذا الجزء المهم من ما تريد
PHP كود :
' تحديد الوصلة النشطة '
Dim activeElement As HtmlElement wb.Document.ActiveElement

' "href" أخذ العنوان من السمة '
Dim url As String activeElement.GetAttribute("href"
الرد }}}}
تم الشكر بواسطة: سعود


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف يمككني انشاء الحدث KeyPress IBCompany 5 79 أمس, 08:03 PM
آخر رد: مساعدة
  منع تسجيل بيانات علي جدول الحركات بقاعدة بيانات sql خلال فترة زمنية (اقفال الفترة ا) السيد الجوهري 4 190 09-01-17, 07:22 PM
آخر رد: السيد الجوهري
  [سؤال] تسجيل دخول الفيس من خلال تطبيق ابو روضة 3 210 03-01-17, 05:40 AM
آخر رد: ابو روضة
  مساعدة لو سمحتو (طريقة تحريك صورة من خلال احداثيات موجودة في ملف نصي بدون ازرار) marten363 3 176 27-12-16, 08:20 PM
آخر رد: مساعدة
  [VB.NET] جلب الرابط بعد التحويل؟ | httpwebrequest | get url after redirect الماجيك مسعد 4 190 17-11-16, 08:08 AM
آخر رد: الماجيك مسعد
Photo [VB.NET] سؤالى عن انواع البيانات اريد اعرف نوع روابط الانترنت elhon.tec 4 192 27-10-16, 11:38 AM
آخر رد: ممدوح
  الادخال والتعديل من خلال الليست بوكس makky 2 191 19-09-16, 07:57 PM
آخر رد: أبو عمر
  ممكن اعرف ازاي اربط بروجيكتين ببعض medoddd 1 147 19-09-16, 02:18 PM
آخر رد: ممدوح
  سؤال : ملأ TreeView من خلال الاداة Background Worker ابراهيم النعيمي 2 213 03-09-16, 09:11 PM
آخر رد: ابراهيم النعيمي
  [VB.NET] كيف يتم البحث في الويندوز من خلال البرنامج jassim316 8 312 30-08-16, 09:09 PM
آخر رد: jassim316

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم