iOS Question Extract HTTP Response on Error

I

iCAB

Well-Known Member
Licensed User
Longtime User
Hello There

I am using HTTPUtils ( https://www.b4x.com/android/forum/threads/46565/#content ) and so far all is good until I tried to extract the response block returned OnError by the server ( I was unable to find a way to do it unless I am missing something).

B4X: 
Sub hc_ResponseError (Response As HttpResponse, Reason As String, StatusCode As Int, TaskId As Int)
'Unable to get the info from Response on error
End Sub

When I examined our equivalent B4A code, I noticed that we are using OKHTTPResponse.
With B4I, it seems that I have to include the standard library iHttpUtils2 while with B4A I didn't (again if I am not wrong in here). But when I include iHttpUtils2 the compiler complains about a duplicate declaration for HttpJob because we are using a shared module named "HttpJob" between the B4A and B4I apps.

What is the best way around this without having to rename the shared module
 
Sort by date Sort by votes

Semen Matusovskiy

Well-Known Member
Licensed User
Take a look a folder, where B4i is installed. Modify iHttpUtils2.b4xlib inside Libraries subfolder.
b4xlib is a zip file. Simply change extension and extract bas files.
 
Upvote 0
I

iCAB

Well-Known Member
Licensed User
Longtime User
Hi All,

Thanks for all your help, but somehow I guess we moved away from the initial problem that I was trying to solve in the first place. Perhaps my mistake.

My main goal is to be able to extract the response contents when the server returns an Error.

With B4A, Response.ErrorResponse holds everything I need
B4X: 
Sub hc_ResponseError (Response As OkHttpResponse, Reason As String, StatusCode As Int, TaskId As Int)
    Dim ServerResponse as String = Response.ErrorResponse

    'I am able to decode the JSON string returned by the server in B4A
    
End Sub


In B4I, the response signature

B4X: 
Sub hc_ResponseError (Response As HttpResponse, Reason As String, StatusCode As Int, TaskId As Int)
    'How do I get the response contents in here.
    'The server is returning a JSON block with information messages
End Sub


Thanks
iCAB
 
Upvote 0

Semen Matusovskiy

Well-Known Member
Licensed User
I remember this problem. When I wrote about 3 years ago, I asked to replace error code to 250 (pseudo-success). Web developer was very angry - he likes standards.

But then I read that Erel fixed this trouble. If to compare old and current release, a new release tries to replace Reason by Response.GetString.
B4X: 
Sub hc_ResponseError (Response As HttpResponse, Reason As String, StatusCode As Int, TaskId As Int)
    Log("ResponseError: " & Reason & ", status code: " & StatusCode)
    Try
        Dim j As String = Response.GetString
        If j <> "" Then Reason = j
    Catch
        Reason = "(Error decoding response)"
    End Try
    CompleteJob(TaskId, False, Reason, Response)
End Sub
Try to correct your HttpUtils2Service.Bas. Probably, will work.
 
Upvote 0

Semen Matusovskiy

Well-Known Member
Licensed User
iHttp should be current (1.02).
The text - I think that simply forgot to change xml-file.
 

Attachments

  • HttpJob.bas
    10.6 KB · Views: 240
  • HttpUtils2Service.bas
    4.1 KB · Views: 322
Last edited:
Upvote 0
You must log in or register to reply here.

Similar Threads

  • Solved
iOS Question Firebase Sending tool needs update to support Firebase Cloud Messaging V1
Replies
6
Views
6K
aeric
  • Locked
  • Article
B4A Library [B4X] XUI Views - Cross platform views and dialogs
3 4 5
Replies
97
Views
193K
Erel
  • Locked
  • Question
iOS Question iHttpUtils Response string is empty on error
Replies
11
Views
3K
Erel
Bug? HTTP response different in B4i
Replies
6
Views
2K
Erel
  • Locked
  • Article
B4J Library [B4X] jRDC2 - B4J implementation of RDC (Remote Database Connector)
5 6 7
Replies
138
Views
144K
Erel
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…