none
הצגת יוטיוב ב- vb.net

תשובות

  • שלום,

    בסוף מצאתי את הפתרון בעצמי,

    והוא:

    להוריד את הסרטון של ה- יוטיוב באמצעות קוד, אז להריץ אותו ב vlc או MediaPlayer

    להלן הקוד שמוריד את הסרטון ושומר לי אותו כוידאו:

    Dim y As VideoLibrary.YouTube = YouTube.Default
                Dim vid As Video = y.GetVideo(txt_youtubeurl.Text)
    
                Dim url = txtTo.Text + "\" + vid.FullName
                System.IO.File.WriteAllBytes(url, vid.GetBytes())

    בשביל זה יש להתקין נוגט: VideoLibrary

    ואני ארשום גם את הקוד של הפעלת הסירטו באמצעות MediaPlayer:

      AxWindowsMediaPlayer1.URL = url
            AxWindowsMediaPlayer1.settings.setMode("loop", True)
            AxWindowsMediaPlayer1.Ctlcontrols.play()

    בהצלחה


    יום חמישי 17 מאי 2018 13:04

כל התגובות

  • יש למשהוא תשובה??

    זה די דחוף לי.

    יום חמישי 17 מאי 2018 08:24
  • שלום,

    בסוף מצאתי את הפתרון בעצמי,

    והוא:

    להוריד את הסרטון של ה- יוטיוב באמצעות קוד, אז להריץ אותו ב vlc או MediaPlayer

    להלן הקוד שמוריד את הסרטון ושומר לי אותו כוידאו:

    Dim y As VideoLibrary.YouTube = YouTube.Default
                Dim vid As Video = y.GetVideo(txt_youtubeurl.Text)
    
                Dim url = txtTo.Text + "\" + vid.FullName
                System.IO.File.WriteAllBytes(url, vid.GetBytes())

    בשביל זה יש להתקין נוגט: VideoLibrary

    ואני ארשום גם את הקוד של הפעלת הסירטו באמצעות MediaPlayer:

      AxWindowsMediaPlayer1.URL = url
            AxWindowsMediaPlayer1.settings.setMode("loop", True)
            AxWindowsMediaPlayer1.Ctlcontrols.play()

    בהצלחה


    יום חמישי 17 מאי 2018 13:04