Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Hello all
- This is the Source for How to Make a Youtube to MP3 Downloader / Generator /Converter
- Using Webbrowser
- By Using this you Need
- Webbrowser
- textbox1/textbox2
- Button1 for Navigate
- Button2 for Download/Convert/Generator
- On the Form Load add this Code
- Code:
- webbrowser1.navigate("http://www.youtube-mp3.org/")
- Click the Button1 and add this Code
- Code:
- webbrowser1.document.GetElementById("youtube-url").SetAttribute("Value", TextBox1.Text)
- webbrowser1.document.GetElementById("submit").InvokeMember("Click")
- Click the Button2 and add this code
- Code:
- Dim s As String = WebBrowser1.Document.GetElementById("dl_link").InnerHtml
- Dim redirect As String = s.Replace("<A href=""", "").Replace("""><B>Download</B></A> · <A onclick=""showLinkBox(); return false;"" href=""http://www.youtube-mp3.org/#"">Link this mp3</A>", "")
- TextBox2.Text = redirect
- webbrowser1.navigate(redirect)
- Using Webclient
- This site [http://www.youtube-mp3.org] uses the GET method
- so Simple Code
- You Need
- [*]Button
- [*]Textbox1/Textbox2
- [*]PictureBox to show screenshot
- Our Imports
- Code:
- Imports system.net
- Imports System.Text.RegularExpressions
- Add a Button then enter this code
- [i've Used the Regex to Grab the Values
- Code:
- Dim s as new webclient
- Dim y As String = s.DownloadString("http://www.youtube-mp3.org/api/itemInfo/?video_id=" + Textbox1.text )
- Dim linkoriginal As New System.Text.RegularExpressions.Regex("""image"" : ""(\S+)""\D+\S+\D+""h"" : ""(\S+)""")
- Dim matches As MatchCollection = linkoriginal.Matches(y)
- For Each showlink As Match In matches
- Dim u As String = (showlink.Groups(1).Value)
- Dim t As String = (showlink.Groups(2).Value)
- TextBox2.Text = "http://www.youtube-mp3.org/get?video_id=" + TextBox1.Text + "&h=" + t
- PictureBox1.Image = New Drawing.Bitmap(New IO.MemoryStream(s.DownloadData(u)))
- Next
- Example Image http://i.imgur.com/zHp4n.png
Advertisement
Add Comment
Please, Sign In to add comment