Visualizza wikitesto di Registrare in tempo reale il flusso di dati audio di una radio WEB con le risorse della Classe HttpClient di Gambas

E' possibile registrare in tempo reale il flusso di dati audio di una radio WEB con le risorse della Classe "HttpClient" di Gambas.
<BR>Sarà necessario attivare i Componenti ''gb.net'' e ''gb.net.curl''.

Mostriamo un esempio pratico, nel quale si registrerà il flusso di dati audio di formato MP3 di una radio web.
<BR>Il risultato sarà salvato in apposito file audio mp3.
 Private ht As New HttpClient As "HTTP"
 Private stringa As String
 
 
 '''Public''' Sub Button1_Click()   <FONT Color=gray>' ''Avvia la lettura del flusso di dati audio''</font>
 
  With ht
 <FONT Color=gray>' ''Invia la richiesta al server della radio web per scaricare il flusso di dati audio:''</font>
    .URL = "https&#058;/giosa.radioca.st/stream"
    .Timeout = 15
    .Get()
  End With
    
 '''End'''  
 
 '''Public''' Sub HTTP_Read()  
 
  Dim sBuf As String  
 
 <FONT Color=gray>' ''Legge il flusso di una radio web che trasmette dati audio in formato MP3:''</font>
  Read #ht, sBuf, -100000
  stringa &= sBuf
 
  Me.Text = Len(stringa)
 
 '''End'''
 
 '''Public''' Sub Button2_Click()   <FONT Color=gray>' ''Arresta la lettura del flusso di dati audio''</font>
 
  ht.Stop
  ht.Close
 
 <FONT Color=gray>' ''Salva i dati audio letti in un file:''</font>
  File.Save("/tmp/file.mp3", stringa)
 
 '''End'''