YouTube-Videos Herunterladen

  • VB.NET

Es gibt 75 Antworten in diesem Thema. Der letzte Beitrag () ist von FreakJNS.

    @FreakJNS: Würde spontan sagen, dass es standardmäßig die .ToString()-Überladung benutzt.
    „Was daraus gefolgert werden kann ist, dass jeder intelligentere User sein Geld lieber für Bier ausgibt, um einen schönen Rausch zu haben, und nicht dieses Ranzprodukt.“

    -Auszug aus einer Unterhaltung über das iPhone und dessen Vermarktung.

    Propier es doch!

    Aja dürfte ich dich mal eine kleine Offtopic Frage fragen:
    Machst du eig. alle paar Stunden ein neues Projekt?
    Mfg: Gather
    Private Nachrichten bezüglich VB-Fragen werden Ignoriert!

    @ChipPRO Österreich
    Da kannste einen Stream von OBI verwenden, der wird das auch nicht rausreißen^^ Wo ist bitte die Verbindung zwischen den ganzen Streams und der Datei auf ieinem YT-Server?
    Dein ganzer Code da bewirkt alles, nur nciht das, was er im entferntesten soll. Höre doch auf FuFu

    @Lukas
    Stimmt^^ Wenn man versucht einen Filestream mittels Streamwriter in eine Datei zu schreiben, dann kommt bei mir das raus:
    System.IO.FileStream
    ergo => Filestream.ToString xDDDD

    @Gather
    würde mich auch interessieren

    /Total Edit\

    VB.NET-Quellcode

    1. Public Sub DownloadVideos(ByVal URL As Uri, ByVal File As String)
    2. 'URL = Die aktuelle YouTube-URL
    3. Dim VideoID As String = URL.ToString
    4. Dim ModifidedURL As String
    5. Dim wClient As WebClient
    6. Try
    7. If VideoID.Contains("http://www.youtube.com/watch?v=") Then
    8. VideoID.Replace("http://www.youtube.com/watch?v=", " ")
    9. End If
    10. ModifidedURL = String.Format("http://www.youtube.com/get_video_info?video_id={0}&asv=3&el=detailpage&hl=en_US", VideoID)
    12. wClient = New WebClient
    14. wClient.DownloadFile(ModifidedURL, File)
    16. MsgBox("Download erfolgreich")
    17. Catch ex As Exception
    18. MessageBox.Show("Fehler:" & vbCrLf & ex.Message, ex.Source)
    19. End Try
    20. End Sub

    Lädt bei meinem video 1k herunter.

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „ChipPRO Österreich“ ()

    Ich suche schon, IchWeißNichtWieLang schon nach der Aktuellen YouTube-Download URL.

    //Edit\\
    Könnte das bitte jemand zum Laufen bringen:

    VB.NET-Quellcode

    1. If VideoID.Contains("http://www.youtube.com/watch?v=") Then
    2. VideoID.Replace("http://www.youtube.com/watch?v=", " ")
    3. End If

    Das soll nämlich die Video-ID extrahieren.
    Funzt aber nicht.

    WebClient.DownloadString()
    regex oder String-Methoden
    WebClient.DownloadFile()

    [bzw. jeweils die Async-Methoden]
    Warum 20 Zeilen schreiben, wenn ich das in einer haben kann und nur auf Framework-Features zurückgreife?

    Guck dir bitte die Ausgabe von "get_video_info" an.
    Dort steht ein netter kleiner "Text" über den Link drin:
    Lang

    Quellcode

    1. url_encoded_fmt_stream_map=url%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v19---lscache7.c.youtube.com%252Fvideoplayback%253Fupn%253DpPNO1vDct0o%2526sparams%253Dcp%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Cratebypass%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526key%253Dyt1%2526itag%253D46%2526ipbits%253D8%2526signature%253D253BDF9D780FC6D20F7DD55995AD083A82412E53.6FDAFF722B2B9221CE8A320128FD6E1A14119952%2526mv%253Dm%2526sver%253D3%2526mt%253D1346943734%2526ratebypass%253Dyes%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526ip%253D91.96.89.73%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dhd1080%26fallback_host%3Dtc.v19.cache7.c.youtube.com%26type%3Dvideo%252Fwebm%253B%2Bcodecs%253D%2522vp8.0%252C%2Bvorbis%2522%26itag%3D46%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v19---lscache3.c.youtube.com%252Fvideoplayback%253Fupn%253DpPNO1vDct0o%2526sparams%253Dcp%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Cratebypass%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526key%253Dyt1%2526itag%253D37%2526ipbits%253D8%2526signature%253D09007C19BF0117B33BB6F4A130A570481F17EAA1.7DD69B8058DFBD35EFB2608412C1DCACCBD881D0%2526mv%253Dm%2526sver%253D3%2526mt%253D1346943734%2526ratebypass%253Dyes%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526ip%253D91.96.89.73%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dhd1080%26fallback_host%3Dtc.v19.cache3.c.youtube.com%26type%3Dvideo%252Fmp4%253B%2Bcodecs%253D%2522avc1.64001F%252C%2Bmp4a.40.2%2522%26itag%3D37%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v6---lscache6.c.youtube.com%252Fvideoplayback%253Fupn%253DpPNO1vDct0o%2526sparams%253Dcp%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Cratebypass%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526key%253Dyt1%2526itag%253D45%2526ipbits%253D8%2526signature%253D39D1DE6301E033B184AC6DCBE19503EDF3CAAF67.140ADF770FD2CC6A71EB9E9480866D4BA7AF2AA5%2526mv%253Dm%2526sver%253D3%2526mt%253D1346943734%2526ratebypass%253Dyes%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526ip%253D91.96.89.73%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dhd720%26fallback_host%3Dtc.v6.cache6.c.youtube.com%26type%3Dvideo%252Fwebm%253B%2Bcodecs%253D%2522vp8.0%252C%2Bvorbis%2522%26itag%3D45%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v10---lscache2.c.youtube.com%252Fvideoplayback%253Fupn%253DpPNO1vDct0o%2526sparams%253Dcp%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Cratebypass%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526key%253Dyt1%2526itag%253D22%2526ipbits%253D8%2526signature%253D301F2061C31792865E02EE02CBB879321690ED3B.9484FE5E7742B926439DDADBF76D2816EE36E03A%2526mv%253Dm%2526sver%253D3%2526mt%253D1346943734%2526ratebypass%253Dyes%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526ip%253D91.96.89.73%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dhd720%26fallback_host%3Dtc.v10.cache2.c.youtube.com%26type%3Dvideo%252Fmp4%253B%2Bcodecs%253D%2522avc1.64001F%252C%2Bmp4a.40.2%2522%26itag%3D22%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v19---lscache7.c.youtube.com%252Fvideoplayback%253Fupn%253DpPNO1vDct0o%2526sparams%253Dcp%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Cratebypass%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526key%253Dyt1%2526itag%253D44%2526ipbits%253D8%2526signature%253D03D924A4739D42E6930C42BF3B47AAC8D6654328.34D629728DB998B0C4815D4F3C6B2A94E4ADD5F9%2526mv%253Dm%2526sver%253D3%2526mt%253D1346943734%2526ratebypass%253Dyes%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526ip%253D91.96.89.73%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dlarge%26fallback_host%3Dtc.v19.cache7.c.youtube.com%26type%3Dvideo%252Fwebm%253B%2Bcodecs%253D%2522vp8.0%252C%2Bvorbis%2522%26itag%3D44%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v5---lscache3.c.youtube.com%252Fvideoplayback%253Fip%253D91.96.89.73%2526upn%253DpPNO1vDct0o%2526sparams%253Dalgorithm%25252Cburst%25252Ccp%25252Cfactor%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526mt%253D1346943734%2526key%253Dyt1%2526algorithm%253Dthrottle-factor%2526burst%253D40%2526ipbits%253D8%2526itag%253D35%2526sver%253D3%2526signature%253DBBF4A4C352108A147B707C4FAF4BF08FD9719862.0E9A5CBF4B37097584F9E66AF38B74493EDB9F0B%2526mv%253Dm%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526factor%253D1.25%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dlarge%26fallback_host%3Dtc.v5.cache3.c.youtube.com%26type%3Dvideo%252Fx-flv%26itag%3D35%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v19---lscache4.c.youtube.com%252Fvideoplayback%253Fupn%253DpPNO1vDct0o%2526sparams%253Dcp%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Cratebypass%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526key%253Dyt1%2526itag%253D43%2526ipbits%253D8%2526signature%253DAFB04D631CD7C87A6EB3EAFE319001A532140204.10F68A8EAE0D5E7E21A476CFC0938CE3BF377352%2526mv%253Dm%2526sver%253D3%2526mt%253D1346943734%2526ratebypass%253Dyes%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526ip%253D91.96.89.73%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dmedium%26fallback_host%3Dtc.v19.cache4.c.youtube.com%26type%3Dvideo%252Fwebm%253B%2Bcodecs%253D%2522vp8.0%252C%2Bvorbis%2522%26itag%3D43%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v22---lscache7.c.youtube.com%252Fvideoplayback%253Fip%253D91.96.89.73%2526upn%253DpPNO1vDct0o%2526sparams%253Dalgorithm%25252Cburst%25252Ccp%25252Cfactor%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526mt%253D1346943734%2526key%253Dyt1%2526algorithm%253Dthrottle-factor%2526burst%253D40%2526ipbits%253D8%2526itag%253D34%2526sver%253D3%2526signature%253D605689CC3DE96755FD97E3A39B35551B1DF1ED79.998A70DE81CABEFFDE08BDCA1F1BC79085253CB7%2526mv%253Dm%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526factor%253D1.25%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dmedium%26fallback_host%3Dtc.v22.cache7.c.youtube.com%26type%3Dvideo%252Fx-flv%26itag%3D34%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v15---lscache3.c.youtube.com%252Fvideoplayback%253Fupn%253DpPNO1vDct0o%2526sparams%253Dcp%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Cratebypass%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526key%253Dyt1%2526itag%253D18%2526ipbits%253D8%2526signature%253D62B00C0AECB0F2AA2AC8C9EEDE70D51521E1AC68.97BF39173D0C995CF0EB7F25CAF1326B622EAABA%2526mv%253Dm%2526sver%253D3%2526mt%253D1346943734%2526ratebypass%253Dyes%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526ip%253D91.96.89.73%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dmedium%26fallback_host%3Dtc.v15.cache3.c.youtube.com%26type%3Dvideo%252Fmp4%253B%2Bcodecs%253D%2522avc1.42001E%252C%2Bmp4a.40.2%2522%26itag%3D18%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v5---lscache3.c.youtube.com%252Fvideoplayback%253Fip%253D91.96.89.73%2526upn%253DpPNO1vDct0o%2526sparams%253Dalgorithm%25252Cburst%25252Ccp%25252Cfactor%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526mt%253D1346943734%2526key%253Dyt1%2526algorithm%253Dthrottle-factor%2526burst%253D40%2526ipbits%253D8%2526itag%253D5%2526sver%253D3%2526signature%253D0F15B20883F193E3984032A8C9AF2E7A4B319F80.0993D33F58B758A6F3CB8A82C05103F13D4BB592%2526mv%253Dm%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526factor%253D1.25%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dsmall%26fallback_host%3Dtc.v5.cache3.c.youtube.com%26type%3Dvideo%252Fx-flv%26itag%3D5%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v13---lscache8.c.youtube.com%252Fvideoplayback%253Fip%253D91.96.89.73%2526upn%253DpPNO1vDct0o%2526sparams%253Dalgorithm%25252Cburst%25252Ccp%25252Cfactor%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526mt%253D1346943734%2526key%253Dyt1%2526algorithm%253Dthrottle-factor%2526burst%253D40%2526ipbits%253D8%2526itag%253D36%2526sver%253D3%2526signature%253D0D47A7E80444903DA943B9E6E2AA001E3997A4E9.611165767915EF38F346597B95179831C181F3C4%2526mv%253Dm%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526factor%253D1.25%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dsmall%26fallback_host%3Dtc.v13.cache8.c.youtube.com%26type%3Dvideo%252F3gpp%253B%2Bcodecs%253D%2522mp4v.20.3%252C%2Bmp4a.40.2%2522%26itag%3D36%2Curl%3Dhttp%253A%252F%252Fo-o---preferred---ewetel-bre1---v3---lscache1.c.youtube.com%252Fvideoplayback%253Fip%253D91.96.89.73%2526upn%253DpPNO1vDct0o%2526sparams%253Dalgorithm%25252Cburst%25252Ccp%25252Cfactor%25252Cgcr%25252Cid%25252Cip%25252Cipbits%25252Citag%25252Csource%25252Cupn%25252Cexpire%2526fexp%253D924403%25252C904819%25252C903806%25252C922401%25252C920704%25252C912806%25252C924410%25252C924412%25252C913558%25252C912706%2526mt%253D1346943734%2526key%253Dyt1%2526algorithm%253Dthrottle-factor%2526burst%253D40%2526ipbits%253D8%2526itag%253D17%2526sver%253D3%2526signature%253DAD19D34C3D10411BC570D2E65996ED6E3D41A3A0.C4C28DA99B9F2A91133998B96AA613828251A59B%2526mv%253Dm%2526source%253Dyoutube%2526ms%253Dau%2526gcr%253Dde%2526expire%253D1346969172%2526factor%253D1.25%2526cp%253DU0hTS1lRV19MTENOM19RS0FCOlpYNEtLLVFyZDlp%2526id%253D6878e93b3b10f582%26quality%3Dsmall%26fallback_host%3Dtc.v3.cache1.c.youtube.com%26type%3Dvideo%252F3gpp%253B%2Bcodecs%253D%2522mp4v.20.3%252C%2Bmp4a.40.2%2522%26itag%3D17

    Dort kannste dir nen Link draus bauen und den runterladen, where's the problem?

    du sollst den link nach "url_encoded_fmt_stream_map=url%3D" herunterladen.

    ob du den seitenquelltext krüppelig mit webrequest beschaffst oder sauber mit WebClient.DownloadString ist deine sache. mit deinen fähigkeiten solltest du solche tätigkeiten vielleicht eher an die mitarbeiter deiner frima deligieren ^^

    ich vermute sie hat sich gegen dich verschworen und sie funktioniert nur auf deinem rechner nicht. das ist zu entschuldigen, da du sie zu 100% richtig angewannt hast.


    zum glück gibt es ja noch String.Split()!

    Programmier mal einen Editor, damit du dir den Text in der 1KB-Datei ansehen kannst. Bei mir stehen da so lustige sachen wie "status=fail&errorcode=2&reason=Invalid+parameters." oder ein Haufen Infos wie AliveDevil sie gefunden hat. Das Video in sich ist das aber lange nicht.

    Außerdem funktioniert deine Replace-Funktion so nicht. FUNKTION, das heißt sie liefert einen Wert zurück. Intellisense regelt den rest. Mehr verrate ich mal an dieser Stelle nicht - aber so solltest du darauf kommen, wie die Replace-FUNKTION richtig funst.

    lg xD

    Wollt gerade drauf ansperchen:

    VB.NET-Quellcode

    1. Public Sub DownloadVideos(ByVal URL As Uri, ByVal File As String, ByVal TXT_Data As String)
    2. Dim VideoID As String = URL.ToString
    3. Dim ModifidedURL As String
    4. Dim CompledeYTD_URL As String = ""
    5. Dim sTXTReader As StreamReader
    6. Dim wURL As WebClient
    7. Dim wClient As WebClient
    8. Try
    9. If VideoID.Contains("http://www.youtube.com/watch?v=") Then
    10. VideoID.Replace("http://www.youtube.com/watch?v=", " ")
    11. End If
    12. ModifidedURL = String.Format("http://www.youtube.com/get_video_info?video_id={0}&asv=3&el=detailpage&hl=en_US", VideoID)
    14. wURL = New WebClient
    15. wURL.DownloadFile(ModifidedURL, TXT_Data)
    17. sTXTReader = New StreamReader(TXT_Data)
    18. CompledeYTD_URL = sTXTReader.ReadToEnd
    20. wClient = New WebClient
    21. wClient.DownloadFile(CompledeYTD_URL, File)
    23. MsgBox("Download komplett")
    24. Catch ex As Exception
    25. MessageBox.Show("Fehler:" & vbCrLf & ex.Message, ex.Source)
    26. End Try
    27. End Sub


    Kommt:
    status=fail&errorcode=2&reason=Invalid+parameters


    Komme einfach nicht weiter...

    VB.NET-Quellcode

    1. Dim WebCl As New System.Net.WebClient
    2. Dim PageSource as String = WebCl.DownloadString("http://www.youtube.com/watch?v=XYZ1234aBcD")
    3. Dim DownloadLink As Uri
    5. DownloadLink = New Uri(*regexen des PageSources*)
    7. WebClient.DownloadFile(DowanloadLink, ZielPfad As String du weißt...)
    und jetzt nochmal von vorn.

Facebook
Telefonspende