تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
جلب قائمة تشغيل يوتيوب | تلبية لطلب الأخ علىّ
#1
طلب منى الأخ على Ali 2020
تحديث الرابط الذى كان بمشاركته فقلت أنشره هنا ليستفيد منه الجميع بأمر الله...





الكود كامل والمشروع مرفق

PHP كود :
Public Class Form1
    Dim lst 
As New List(Of String)
 
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        WebBrowser1
.ScriptErrorsSuppressed True
        WebBrowser1
.Navigate(TextBox1.Text)
 
   End Sub
    Private Sub ListBox1_SelectedIndexChanged
(sender As ObjectAs EventArgsHandles ListBox1.SelectedIndexChanged
        WebBrowser1
.Navigate("https://www.youtube.com/" lst(sender.selectedindex))
 
   End Sub
    Private Async Sub Button2_Click
(sender As ObjectAs EventArgsHandles Button2.Click
        Dim input 
As HtmlElementCollection
        input 
WebBrowser1.Document.GetElementsByTagName("a")
 
       For Each item As HtmlElement In input
            If item
.GetAttribute("id").Contains("wc-endpoint"Then
                lst
.Add(item.GetAttribute("href"))
 
           End If
 
       Next item
        Await Task
.Delay(1000)
 
       '    'جلب الاسم
        Dim inp 
As HtmlElementCollection
        inp 
WebBrowser1.Document.GetElementsByTagName("span")
 
       For Each item As HtmlElement In inp
            If item
.GetAttribute("id") = ("video-title"Then
                ListBox1
.Items.Add(item.InnerText)
 
           End If
 
       Next item
        Me
.Text ListBox1.Items.Count
    End Sub
End 
Class 


الملفات المرفقة
.rar   playlist youtube.rar (الحجم : 82.22 ك ب / التحميلات : 42)
الرد
#2
الله يعوض عليك بل خير والزري الصلحة
شو حل عدام تشغيل موقع يتيوب
علي اداة ويب ابروزر انا بشغل يتيوب مش قبل هل
في برنامج عدي نص نزلة جافا سكربت
وعلي الفضي واقلاش ابلاير علي الفضي
بلهي تسعدني وكون شكر الككككككككككك

(29-08-20, 03:17 AM)Ali 2020 كتب :
الله يعوض عليك بل خير والزري الصلحة
شو حل عدام تشغيل موقع يتيوب
علي اداة ويب ابروزر انا بشغل يتيوب مش قبل هل
في برنامج عدي نقص نزلة جافا سكربت
وعلي الفضي واقلاش ابلاير علي الفضي
بلهي تسعدني وكون شكر الككككككككككك
الرد
تم الشكر بواسطة: asemshahen5
#3
حمل الملف من مشاركة الأخ خالد هنا



 وأضفه هكذا أخى

الرد
تم الشكر بواسطة: asemshahen5 , ابراهيم ايبو
#4
Heart 
مشكور ابو روضة علي الجهد العظيم
الرد
تم الشكر بواسطة: asemshahen5
#5
السلام عليكم ورحمة الله وبركاتة

الحين المشكلة عدي انو اداة WebBrowser1 تعرض كول
الموقع ماعد موقع اليتيوب مش عرف شو حل المشكلة
هد هل بطلع بيدك تحل المشكلة هد
ولا كيف الامر خلايني اخلاص من المشروع
الرد
تم الشكر بواسطة: asemshahen5
#6
السلام عليكم ورحمة الله وبركاتة
الان اخي ابو رود تم حل المشكلة تعة اداة 
WebBrowser1 كيف تم حل المشكل عرفة  المشكل
وين تقع المشكل في متصفح تاع الويندورز
Internet Explorer وحداث الاصدار وعرض عدي الفيديوهات
علي البرنامج 
الان وبعد ان خلاصة المشكل الخرجي

جاي دور واللي هو كيف اجيب الروبط
تعوت الفيديوهات في قائيمة التشغيل
مش الاسمي تعت الفيديوهات 



لالالا لبود ترد علي واخر طلب مني الك ابو روضة يا
بركة المنتدي بلهي ترد علي وتسعدين 

وكون شكر الك وبهيك بكون نهية البرنامج تعي
بلهي ماتتجهال الرسال هد ورد علي 

وهد اخر طالب مني لك 
^^^وشكراء^^^^
^^^^^^^^^^^^^^^ابو روضة^^^^^^^^^^^^^^
الرد
تم الشكر بواسطة: ابراهيم ايبو , asemshahen5
#7
Exclamation 
السلام عليكم ورحمة الله وبركاتة

اليم انا بدي منك بس تشاهد
الفيديو هد من اجل ان تراء ماء يوجد من البرامج
التي تجلب الروبط


الرد
تم الشكر بواسطة:
#8
اخر فيديو بسويه مشان انت\
لا تفهم علي اسلوب الكتبي تعاتي
كمان انا عملة الفيديو هد وحطية فيه شغال جابر
وكمان بدي تعرف شو نواع المعني اللي انا بحول اعمل علي جلب الروبط

بلهي تشاهد الفيديو والله يوفقق





والله يخليك يا بورضة طول روحك علي اشوي
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [مشروع] كيفية تشغيل صوت او اكثر كخلفية لشرح سترفعه على اليوتيوب سعود 5 1,501 25-09-20, 12:24 PM
آخر رد: سعود
Video [درس فيديو] طريقة تشغيل برنامجك عند تشغيل جهاز الكمبيوتر ahmadpal 0 307 06-06-20, 03:41 AM
آخر رد: ahmadpal
Wink انشاء برنامج يقوم بايقاف تشغيل الكمبيوتر او اعادة تشغيلة او تسجيل الخروج بعد وقت ahmadpal 0 344 29-03-20, 07:01 PM
آخر رد: ahmadpal
  برنامج تشغيل القرآن الكريم أمجد وضاح 1 834 01-01-20, 04:52 PM
آخر رد: asemshahen5
Wink [مشروع] مشروع انشاء قائمة تظهر وتختفي عند الضغط عليها مع السورس كود ahmadpal 4 1,093 05-10-19, 07:24 PM
آخر رد: ahmadpal
Wink مشروع تصميم قائمة منسدلة جانبية مع السورس كود ahmadpal 4 2,678 05-10-19, 07:23 PM
آخر رد: ahmadpal
Wink [مشروع] تصميم قائمة فلات بالفيجوال ستوديو vb.net قائمة تبويبات ahmadpal 3 970 06-09-19, 07:57 PM
آخر رد: سعود
  مشروع تصميم قائمة سلايدر جانبية بالفيجوال بيسك مع السورس كود ahmadpal 0 1,163 18-06-19, 03:41 AM
آخر رد: ahmadpal
  فكرة ظهور قائمة جانبية من اسفل الشاشة viv 4 1,815 22-12-18, 06:54 PM
آخر رد: a.wagdi
  [VB.NET] تشغيل ملف صوتي في الخلفية alsouf 3 951 09-08-18, 11:39 AM
آخر رد: alsouf

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


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