YouTubeLibrary 2011 [v. 1.1]

    • Release

    Es gibt 53 Antworten in diesem Thema. Der letzte Beitrag () ist von ThuCommix.

      YouTubeLibrary 2011 [v. 1.1]

      Hey Leute,

      mir war in der letzten Zeit ein wenig langweilig, und da dachte ich mir, mache ich eine YoutubeLibrary.


      Folgende Features sind vorhanden:




      Das wars erstmal soweit. Wenn ihr noch weitere Ideen für die Lib habt, dann schreibt diese doch einfach.


      Hier nun ein Beispiel Codeschnipsel zur Anwendung der Lib:

      Spoiler anzeigen


      VB.NET-Quellcode

      1. 'Import nicht vergessen, oder auf Namespace verweisen.
      3. Option Strict On
      5. Public Class Form1
      7. Dim WithEvents Y As YouTubeVideo
      9. 'Events
      10. Private Sub Y_DownloadCompleted(ByVal completed As Boolean) Handles Y.DownloadCompleted
      11. If completed = True Then
      12. MsgBox("Video erfolgreich heruntergeladen!")
      13. ElseIf False Then
      14. 'Wird z.B. bei Download Abbruch aufgerufen. YouTubeVideo.DownloadAbbrechen()
      15. MsgBox("Der Download wurde abgebrochen!")
      16. End If
      17. End Sub
      18. Private Sub Y_DownloadProgress(ByVal percentage As Integer) Handles Y.DownloadProgress
      19. 'Falls Progressbar vorhanden.
      20. ProgressBar1.Value = percentage
      21. End Sub
      23. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      24. 'Bricht den Downloadvorgan ab.
      25. If Y.DownloadAktiv = True Then
      26. Y.DownloadAbbrechen()
      27. Else
      28. MsgBox("Es ist kein Download aktiv!")
      29. End If
      30. End Sub
      32. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
      33. Y = New YouTubeVideo("http://www.youtube.com/watch?v=yZRL4vUq7U4")
      35. 'Ausgabe der Infos
      36. MsgBox("Titel: " & Y.VideoTitel)
      37. MsgBox("Autor: " & Y.VideoAutor)
      38. MsgBox("VideoID: " & Y.VideoID)
      39. MsgBox("Likes: " & CStr(Y.VideoLikes))
      40. MsgBox("Dislikes: " & CStr(Y.VideoDislikes))
      41. MsgBox("Aufrufe: " & CStr(Y.VideoAufrufe))
      42. MsgBox("Vorschaubild: " & CStr(Y.VideoImageUrl))
      43. MsgBox("Uploaddatum: " & CStr(Y.VideoUploadDatum))
      45. 'Download des Videos auf den Desktop
      46. Y.DownloadVideo(My.Computer.FileSystem.SpecialDirectories.Desktop)
      47. End Sub
      48. End Class





      Die Lib ist selbstverständlich Option Strict On


      Verwendete Programmiersprache:
      Visual Basic .NET

      Systemanforderungen:
      .NET Framework 2.0

      Download:

      *Klicken*

      Version (1.1)
      (ca. 20KB)


      Changelog:

      1.0 -> Erste Version
      1.1 -> Neue Funktionen hinzugefügt, Bugs behoben

      Lizenz/Weitergabe:
      Closed Source, Dekompilierung Verboten! Einkompilieren Verboten!
      *Lizenz Details

      Wer die Lib nutzt, der soll einfach einen kleinen Vermerk in seinem Programm unterbringen ;)



      MfG



      MB-Tech

      Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „MB-Tech“ ()

      ThuCommix schrieb:

      Wenn du noch Abspielen eines Videos mit Pause, Play, und Repeat hinbekommst wär das sehr geil!

      Wird eingebaut, sobald ich Zeit finde ;)

      LG

      Es kommen als fehler wie z.b bei VideoAufrufe:
      Das angegebene Argument liegt außerhalb des gültigen Wertebereichs.
      Parametername: i
      oder auch bei VideoImageUrl:

      Die Länge darf nicht kleiner als 0 (null) sein.
      Parametername: length
      Moderatorin: "Apropo ritzen.." Shin Chan: "hoho sie hat Po ritze gesagt"
      "saying to buy a mac because your anti-virus expired is like saying you're out of condoms so you're just going to go fuck dudes"
      "Wie auch in anderen Threads kann ich leider nichts bieten außer vielleicht spaß beim Skypen aber mehr leider auch nicht." - Sind kinder pornos nicht verboten?

      Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Glossy Cherry“ ()

      Hi, erstmal eine sehr schöne Libary, aber mir fehlt zB:
      • Länge des YT-Videos
      • Download in verschiedenen Videoformaten
      • Download als MP3


      Ansonsten gut gemacht :) :thumbsup:
      --- Zurzeit inaktiv ---

      TTX.exe schrieb:

      Irgendwie scheint die Lib nicht mit jedem Youtube Video zu funktionieren 8|
      Werde bald ein Update rausbringen...

      Geduld :P

      Live schrieb:


      Hi, erstmal eine sehr schöne Libary, aber mir fehlt zB:
      Länge des YT-VideosDownload in verschiedenen VideoformatenDownload als MP3

      Ansonsten gut gemacht :) :thumbsup:
      Wenn sie das könnte, dann müsste ich sie FFMPEG Lib nennen.



      LG

      Ich glaub ich weiß auch woran das liegt :D Du scheinst Y.VideoTitel auch als Dateiname zu nutzen, wenn der Titel illegale Zeichen für einen Dateinamen hat, läd er das Video ;). Solltest du das ändern sollte man aber die Möglichkeit haben den Dateinamen zu bekommen :whistling:
      : NV Updater | Nvidia Driver Update Tool

      TTX.exe schrieb:

      Hm also das Video "http://www.youtube.com/watch?v=3XIjQgLIsjs&feature=relmfu" kann ich damit nicht downloaden :)? Ansonsten coole Sache die Lib ^^
      Danke dir.

      Bei mir geht es aber. Poste mal deinen Code, vielleicht hast du etwas Falsch angegeben.

      LG

      VB.NET-Quellcode

      1. Y = New YouTubeVideo("http://www.youtube.com/watch?v=3XIjQgLIsjs&feature=relmfu")
      2. MsgBox("Titel: " & Y.VideoTitel)
      3. Y.DownloadVideo("D:\Temp\")

      Das das funktioniert bei mir nicht, er macht eigentlich nichts außer sagen das der Download erfolgreich ist ;)

      Edit:
      kk mein Fehler, ich hab die dll nicht richtig aktualisiert -.-", kommt man auch an den Dateinamen ran den deine lib dann verwendet?
      : NV Updater | Nvidia Driver Update Tool

      Der Dateiname ist der Videotitel & ".flv"

      Allerdings werden beim Download die Sonderzeichen entfernt.

      LG

      TTX.exe schrieb:

      Wäre gut wenn du das noch direkt abrufbar machst :) z.B. Y.FileName oder sowas ^^
      Okay, werde ich beim Update auf 1.2 berücksichtigen.

      Das heißt dann VideoTitelOhneSonderzeichen.


      LG


      EDIT:Aber hast du dir schonmal die DownloadPfad Property angeschaut? Da steht doch alles drin.

      stevenart schrieb:

      Downloaded deine dll immer des video mit der höchsten qualität oder einfach nur immer z.B. des 360p video?
      Immer in der höchstmöglichen Qualität.

      LG

    Facebook
    Telefonspende