Seite 1 von 1

Rippen von Internetradios

Verfasst: 24.05.2009 12:37
von purebas
Ich suche Funktionen zum Rippen von Internetradios.
Ideal wäre am Ende eine DLL, die alle wichtigen Funktionen beinhaltet.

Verfasst: 24.05.2009 13:56
von sibru
Na, mit der SuFu "RadioStream" gibt´s u.A. folgendes Ergebniss:

Code: Alles auswählen

#URL="http://server4.digital-webstream.de:10885"

Enumeration
  #MyWindow
  #WebGadget
EndEnumeration

OpenWindow(#MyWindow,0,0,0,0,"Radio",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
CreateGadgetList(WindowID(#MyWindow))

;erstmal HTML-Steuerung aufbauen:
Html.s
Html + "<object id='VIDEO' width='0' height='0'"
Html + "style='position:absolute; left:0; top:0;'"
Html + "classid='clsid:6BF52A52-394A-11d3-B153-00C04F79FAA6'" ;normal video
Html + "type='application/x-oleobject'>"
Html + "<param name='URL' value='"+#URL+"'>"
;  Html + "<param name='volume' value='" + Str(GetGadgetState(#Volume)) + "'>"
Html + "<param name='StretchToFit' value='true'>"
Html + "<param name='UiMode' value='mini'>"
Html + "<param name='EnableContextMenu' value='false'>"
Html + "</object>"

WebGadget(#WebGadget,0,0,0,0,"about:blank",#PB_Web_Mozilla) ;gadget aufbauen...

While GetGadgetAttribute(#WebGadget, #PB_Web_Busy) <> 0
  While WindowEvent() : Delay(0) : Wend
Wend

SetGadgetItemText(#WebGadget, #PB_Web_HtmlCode, Html)

Verfasst: 25.05.2009 22:54
von purebas
Ich habe eine DLL gefunden, die wahrscheinlich die benötigten Funktionen hergibt.

http://www.un4seen.com/bass.html
Es existiert auch eine PureBas API.

Gibt es Jemanden der ein Beispiel-Programm erstellen kann, welches einen Stream (unverändert) abspeichert?