تقييم الموضوع :
  • 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"
الرد }}}}
تم الشكر بواسطة: سعود


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] عايز اعرف ازاى اعمل برنامج بقاعدة بيانات xaml MOSTAFA.KAMEL 3 116 13-05-17, 11:01 PM
آخر رد: العواد الصغير
  [نقاش] ارسال رسائل whatsapp من خلال ال vb.net mohamed haroon 0 67 05-05-17, 12:03 AM
آخر رد: mohamed haroon
Photo [سؤال] بحث في قاعده البيانات من خلال combobox سنان عبدالله سنان 2 90 02-05-17, 01:20 AM
آخر رد: ابو ليلى
  التأثير على فورم ببرنامج من خلال فورم ببرنامج أخر djelloul 1 70 25-04-17, 02:01 AM
آخر رد: silverlight
  السلام عليكم هل يمكنني تنفيذ امر صوتي الى الضغط على button من خلال الصوت mohammed.gadain61 6 184 13-04-17, 01:48 PM
آخر رد: matrixmas
  تغيير ثيم من خلال Setting abdulla2 1 135 16-03-17, 04:02 PM
آخر رد: thevirus
  منع تسجيل بيانات علي جدول الحركات بقاعدة بيانات sql خلال فترة زمنية (اقفال الفترة ا) السيد الجوهري 6 348 15-03-17, 11:18 AM
آخر رد: الحزين اوى
  كيف يمككني انشاء الحدث KeyPress IBCompany 5 150 24-02-17, 08:03 PM
آخر رد: مساعدة
  [سؤال] تسجيل دخول الفيس من خلال تطبيق ابو روضة 3 297 03-01-17, 05:40 AM
آخر رد: ابو روضة
  مساعدة لو سمحتو (طريقة تحريك صورة من خلال احداثيات موجودة في ملف نصي بدون ازرار) marten363 3 259 27-12-16, 08:20 PM
آخر رد: مساعدة

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


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