تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] اضافة vimeo
#1
السلام عليكم
كيف يمكن اضافة فيديو من فيمو في الفيجوال ؟
وجزاكم الله خيراً
الرد
تم الشكر بواسطة:
#2
.....

منقول

أولا أضف الأداة WindowsMediaPlayer إلى مجموعة الأدوات كالتالي
أظهر الفورم في وضع التصميم ثم اذهب إلى قائمة الأدوات واضغط زر يمين واختار ...Choose Items


من النافذة اختر التبويب COM Components ومنه صع علامة صح على WindowsMediaPlayer


أضف الأداة WindowsMediaPlayer التي ظهرت في مجموعة الأدوات إلى الفورم وأضف Button و TextBox


كود :
Public Class Form1

    Dim WithEvents WebBrowser1 As New WebBrowser
    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        WebBrowser1.Navigate(Me.TextBox1.Text)
    End Sub

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As WebBrowserDocumentCompletedEventArgs) _
    Handles WebBrowser1.DocumentCompleted
        If WebBrowser1.ReadyState = WebBrowserReadyState.Complete Then
            Dim result = System.Text.RegularExpressions.Regex.Match(WebBrowser1.DocumentText, "(?<=VIDEO src="").+(?="")").Value.Trim
            If result <> "" Then
                WebBrowser1.Stop()
                Me.Text = WebBrowser1.DocumentTitle
                Me.AxWindowsMediaPlayer1.URL = result
            End If
        End If
    End Sub

End Class


.....
الرد
تم الشكر بواسطة: abulayth , Motaz Alnuweiri


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة فى اضافة حقول جديدة فى قاعدة البيانات و ربطها بالفيجوال استوديو nabil.1710 1 65 18-10-18, 01:09 PM
آخر رد: nabil.1710
  اضافة زر امر للداتاجريد محمد خيري 6 135 16-10-18, 07:47 PM
آخر رد: محمد خيري
  مطلوب شرح اضافة اداة فى الفيجول بيسك Mohamed Magdy 8 212 05-10-18, 12:26 AM
آخر رد: elgokr
  [VB.NET] اضافة صورة فارغة لقاعدة البيانات محمد اسماعيل 5 115 03-10-18, 01:08 PM
آخر رد: محمد اسماعيل
  [سؤال] اضافة فلتر الى داتا قريد فيو مصطفى محمود 7 209 25-09-18, 02:25 PM
آخر رد: مصطفى محمود
  [سؤال] مشكلة فى اضافة اداة vlc فى الفجول بيسك 2010 naderalkeng54 1 79 21-09-18, 08:12 PM
آخر رد: aljzazy
  [VB.NET] اضافة بيانات الفاتورة عبدالرحمن بشري عمر 6 236 18-08-18, 07:41 AM
آخر رد: ابراهيم ايبو
  اضافة فورم داخل فورم آخر الميامن 6 1,901 15-08-18, 09:31 PM
آخر رد: Ali Naser
  [سؤال] كيفية اضافة signalr للفيجوال 2010 alims 2 140 27-07-18, 02:21 PM
آخر رد: mero5000
  اضافة حركة لليبل حافظ حافظ 7 267 21-07-18, 12:11 AM
آخر رد: elgokr

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


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