Pobieracz Mp3 Z Youtube

[lokuxd]

dodałem tylko gui dla wygody kod z autoitscript.com

obsługa wklejamy link z youtuba z jakimś dobrym kawałkiem i enter czekamy aż się ściagnie i gotowe

jeśli komuś nie działa to znaczy że nie bedzie korzystać z programu poroste:)

a działa napewno:P

 

plusiki mile widziane:)

#include <String.au3>


GUICreate("YouTube_Downloader", 252,50)
$input = GUICtrlCreateInput("Podaj link z Youtube", 5, 5, 240, 20)
GUISetState()
While 1
Switch GUIGetMsg()
	Case $input
		_YoutubeToMp3(GUICtrlRead($input))
		MsgBox(0,"","Zakonczono pobieranie...")
	case -3
		Exit
EndSwitch
WEnd

Func _YoutubeToMp3($_YoutubeUrl)
$_String = _StringBetween( _GetSourceCode('http://www.listentoyoutube.com/download.php?video=' & _
		StringMid($_YoutubeUrl, StringInStr($_YoutubeUrl, 'watch?v=') + 8, 11)), 'src="http://srv', '"')
If Not @error Then InetGet("http://srv" & $_String[0], @DesktopDir & '\' & _GetFullNameByUrl("http://srv" & $_String[0]), 1, 0)

EndFunc   ;==>_YoutubeToMp3

Func _GetFullNameByUrl($_FileUrl)
$_FileName = StringSplit($_FileUrl, '/')
If Not @error Then
	Return $_FileName[$_FileName[0]]
Else
	Return 0
EndIf
EndFunc   ;==>_GetFullNameByUrl

Func _GetSourceCode($_Url)
$_InetRead = InetRead($_Url)
If Not @error Then
	$_BinaryToString = BinaryToString($_InetRead)
	If Not @error Then Return $_BinaryToString
EndIf
EndFunc   ;==>_GetSourceCode

 

przykładowy link do wpisania

 

[4ggr35510n]

Rihanna? :|

 

Jakby sam pobierał na podstawie linku, nie korzystajac z serwisów trzecich to może bym coś dał...

[lokuxd]

Link pierwszy lepszy z głównej:) zrobic to z linku to troche nie łatwe zadanie :P

jak sie dowiem jak to poprobuje narazie nie mam ochoty szuakć;/

[4ggr35510n]

YouTube udostępnia api (php, javascript) dla swoich filmików.

 

Umożliwia to na przykład korzystanie z BB-code "

<link>

" - działanie znane i przydatne ;]

 

W kążdym razie jest obszerna dokumentacja samego YT na temat ściągania z YT ;P (choć raczej nie-wprost, bo na ściąganiu akurat im nie zależy, ale jak uczą jak rozpowszechniać, to i naucza cie ściągać)

[Hibiskupowy]

Przydało się teraz mówią w klasie na mnie geniusz ale muszę im powiedzieć prawde .

 

 

Gdzie on zapisuje pobrane pliki?.

[lokuxd]

tam gdzie masz bota a gdzie?

[Hibiskupowy]

A jeżeli powiększyłem długość to jak mogę coś wpisac w wolnym miejscu?.

[lokuxd]

rob co chcesz bylebys nie poblikowal go ze swoim podpisem...

[teabox]

Publikujesz i opisujesz kod sam nie do końca go znając.. plik jest zapisywany na pulpicie..

 

       If Not @error Then InetGet("http://srv" & $_String[0], @DesktopDir & '\' & _GetFullNameByUrl("http://srv" & $_String[0]), 1, 0)

 

"@DesktopDir"

 

Jeśli ktoś chce by plik był zapisywany w folderze z skryptem zmieńcie @DesktopDir na @ScriptDir

 

PS. Nie zjechałbym cię jak zwykle, ale napisałeś:

"tam gdzie masz bota a gdzie?"

 

Z tym twoim pewniackim "a gdzie".. i po co ten sarkazm skoro nie miałeś racji?

[lokuxd]

Mam go na pulpicie:D wiec tam gdzie go mam mi zapisuje:P no małe przeoczenie dzięki i sorry dla kolegi który pytał

[duleba38]

mógłbyś do tego kodu dodać przycisk <input> "POBIERZ"

[hfaua]

Sam sobie dodaj :] 30sek i gotowe

[Seeker_]

W chwili obecnej ta aplikacja już nie działa... Wklejam link i wciskam enter, po czym wyskakuje "Zakonczono pobieranie" w przeciągu 1-2sec...

[RobeM]

dziwne bo mi działa nawet pod linuxem

[lokuxd]

to wyciaga mp3 jesli bylo skladane np ze zdjeciem z orginalnych filmow mi tez nie wyciaga.

lub jesli sciaga sie inna piosenka tez tak mialem wiec sprawdz jeszcze raz...