Italian radio internet

[ginocasa]

Buonasera a tutti, ho acquistato da poco b4a e dopo i primi programmi di pulsanti e caselle di testo volevo fare un una applicazione piu' complessa, i risultati sono stati molto deludenti.Volevo accedere ad un podcat la sua url e' la seguente:switch3.castup.net/cunet/gm.asp?ai=31&ar=Reshet_Bet utilizzando mediaplayerstream ma ottengo solo errori. Forse puo aprire solo file mp3?
Grazie per eventuali risposte.
Gino:BangHead:

 

[arenaluigi]

Magari prova a postare un po di codice e un po di errori.

 

[ginocasa]

Ciao Arenaluigi, ti ringrazio della risposta, ho provato a cambiare il link della stazione con un'altra stazione e funziona mentre con il link precedente, quello nella linea rem (http://www.switch3.castup.net/cunet/gm.asp?ai=31&ar=Reshet_Bet) mi restituisce diversi errori unknow network seguito da numeri che a volte cambiano.
Grazie
Gino

di seguito le linee di programma:

Sub Process_Globals
Dim mp As MediaPlayerStream
End Sub

Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.

Dim Button1 As Button
Dim Button2 As Button
End Sub

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("radioscreen")
If FirstTime Then
mp.Initialize("mp")
End If
' mp.Load("http://www.switch3.castup.net/cunet/gm.asp?ai=31&ar=Reshet_Bet")
mp.Load("http://radio.glz.co.il:8000/galatz")
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub






Sub mp_StreamReady
Log("starts playing")
mp.Play
End Sub
Sub mp_StreamError (ErrorCode As String, ExtraData As Int)
Log("Error: " & ErrorCode & ", " & ExtraData)
ToastMessageShow("Error: " & ErrorCode & ", " & ExtraData, True)
End Sub
Sub mp_StreamBuffer(Percentage As Int)
Log(Percentage)
End Sub

Sub Button1_Click
mp.Play
End Sub
Sub Button2_Click
mp.Pause
End Sub