Italian Http - ERROR Response.GetString("UTF8") ... altra soluzione

ivanomonti

Expert
Licensed User
Longtime User
tutto fila liscio ma non riesco a capire dove sbaglio !!

ho visto che Response.GetString("UTF8") va per deprecato, ma il suo sucessore qualè.

B4X:
Sub xhttpsocket_ResponseSuccess(Response As HttpResponse, TaskId As Int)
   ProgressDialogHide
   Dim msg As String
   msg = "Connecting to server ..."
   Try
      If Response <> Null Then 
         msg = msg & CRLF & Response.GetString("UTF8")
      End If
      ToastMessageShow (msg, True)
   Catch
      msg = "Error Response"
       ToastMessageShow (msg, True)
   End Try
End Sub

Chi mi da un aiuto ...
 

ivanomonti

Expert
Licensed User
Longtime User
Risolto in questo modo

B4X:
Sub xhttpsocket_ResponseSuccess(Response As HttpResponse, TaskId As Int)
   ProgressDialogHide
   Dim msg As String
   msg = "Connecting to server ..."
   Try
      If Response <> Null Then 
         Response.GetAsynchronously("json",File.OpenOutput(TempFolder, TaskId, False), True, TaskId)
      Else
         ToastMessageShow (msg, True)
      End If
   Catch
      msg = "Error Response"
       ToastMessageShow (msg, True)
   End Try
End Sub

Qui scatta il json (incompleto) ma come noto dall'esempio di Erel recupero i dati da un file che riporta il numero del TaskId, leggendo i dati che mi servono.

Valido sistema anche per immagini, suoni ecc ecc in stream.

B4X:
Sub json_StreamFinish (Success As Boolean, TaskId As Int)
   Dim s As String
   s = File.GetText(TempFolder, TaskId)
   ToastMessageShow (s, True)
End Sub
 
Top