منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
Youtube Video Player - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : الأقسام التعليمية - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=90)
+--- قسم : مكتبة أمثلة ومشاريع أعضاء المنتدى (http://vb4arb.com/vb/forumdisplay.php?fid=114)
+---- قسم : مكتبة مشاريع VB.net (http://vb4arb.com/vb/forumdisplay.php?fid=141)
+---- الموضوع : Youtube Video Player (/showthread.php?tid=7291)



Youtube Video Player - Abu Ehab - 09-12-12

بسم الله الرحمن الرحيم

مثال على تشغيل ملفات الفيديو من اليوتيوب داخل برامجنـــــا





تحيــــــــاتي للجميـــع





Youtube Video Player - mr_mgm - 09-12-12

[COLOR="#000080"]السلام عليكم ورحمه الله وبركاته

شكرا اخي ابو ايهاب علي المثال المميز

ولكن لما تستخدم Remove ثم Insert الافضل استخدام Replace بشكل مباشر .

يمكن الاستغناء عن هذه الاكود
كود :
Dim StartingLink As String = TextBox1.Text
         Dim Re As String = StartingLink.Remove(0, 31)
             Dim CurrectLink As String = Re.Insert(0, "http://www.youtube.com/v/")
واستخدام داله Replace بطريقه مباشره هكذا
كود :
WebBrowser1.Navigate(Replace(TextBox1.Text, "watch?v=", "v/"))

وفقك الله
[/COLOR]


Youtube Video Player - Abu Ehab - 09-12-12

شكرا لمرورك العطر ..
راحت عن بالى ..



Youtube Video Player - الميسري - 09-12-12

مشكور جدآ على هذا البرنامج اخي واستاذي ابو ايهاب


Youtube Video Player - Abu Ehab - 10-12-12

حمل المرفق رقــــــــم 2 المعـدل وأترك الأول