Android Question HttpUtils2 Json API Help Me

[nso91191]

HttpUtils2 Json Help Me Don't Get AnyData (I Get null, null, null ) what wrong code

Search id change but not response

 

[NJDude]

I don't use httputils, but this code will give you an idea how to do what you need.

 

[nso91191]

Special Thank You Brother @NJDude I like this source ...

 

[NJDude]

After you send the request and get the response you will have to check for those values, the sample only shows the parsing, not error control or anything else.

 

[nso91191]

yeah bro i send the request keyword=2 but not show anything

 

[NJDude]

The app will crash because it's expecting all the data on the sample, I don't know how you have your DB organized, so, you will have to write the routines to send and receive the queries and parse them accordingly, nothing is done automatically.

 

[nso91191]

i think twitter v1.1 http://www.b4x.com/android/forum/threads/twitter-v1-1-api-example-application-only-auth.30382/ is what user can search ( username ) searching tweet username .......................

i need (or) i mean this function whatever user can type search ( id ) right result comeout .... id match = data match ||| ( id not found = error )

 

[NJDude]

You will have to do that yourself.

 

[NJDude]

I don't know how I could help you, you already have the foundation to get and parse your data, besides, you only know how your DB is setup, there's not much I can do.

 

[nso91191]

Thank you brother @NJDude for your help source #Respect

 

[KMatle]

Do you use php? Can you post it? I will take a look.

 

[nso91191]

not i use php, my project senior provided me json http://162.243.69.205/shipping_latest/public/api/v1/search?keyword=1

link ..

my work created a mobilewebapp ...

i don't know how to search and use api

===========================================
brother @NJDude SampleApp Work Fine

keyword=1 ( work fine )
keyword = blah blah blah 34235 ( work fine ( response error )
==========================================

keyword change = 2, 3, 4, 5, 6, 7, 8, 9, 10 (
{"message":"Your order still processing","status_code":200} )

not work show in app
App close .........

App ===> input search box and button click ==> show result

i need it please help me

keyword = (id) maybe whatever but show result match data

not found (id ) show error


Anyone have any examples / code snippets of this?

 

[sirjo66]

I'm sorry but I don't understand what is the problem.

If you have the server that response to you with a JSON text, you need only to parse this json (with json parser library) and find out your value.

If the status_code is 200 you don't need to show the data on app.

Use B4A in debug mode, run step-by-step using F8 key, and take a look where is the problem.

I have downloaded your example but it don't works, I click on "next" button but the app don't do anything, so how can I see the problem ??

Sergio

 

[nso91191]

Hey @sirjo66

my problem

How to use root.get and data.get

uncomment root.get

Sub hc_ResponseError(Response As HttpResponse, Reason As String, StatusCode As Int, TaskId As Int)

    Msgbox(Reason, "Error parsing")
   
End Sub

Sub ParseResults_StreamFinish(Success As Boolean, TaskId As Int)
   
    Dim jParser As JSONParser
    Dim JSONText As String
               
                JSONText = File.ReadString(File.DirDefaultExternal, "JsonData.txt")

    jParser.Initialize(JSONText)

    Dim root As Map = jparser.NextObject
    Dim data As Map = root.Get("data")
'    Dim status_code As Int = root.Get("status_code")
'    Dim message As String = root.Get("message")
   
    Dim seller_name As String = data.Get("seller_name")
    Dim shoped_date As String = data.Get("shoped_date")
    Dim arrived_date As String = data.Get("arrived_date")
    Dim error As String = data.Get("error")
    Dim next_place As String = data.Get("next_place")
    Dim customer_phone As String = data.Get("customer_phone")
    Dim seller_phone As String = data.Get("seller_phone")
    Dim customer_name As String = data.Get("customer_name")
    Dim package_name As String = data.Get("package_name")
    Dim shipping_address As String = data.Get("shipping_address")
    Dim complete As String = data.Get("complete")
    Dim passed_place As List = data.Get("passed_place")
    For Each colpassed_place As String In passed_place
    Next
    Dim error_message As String = data.Get("error_message")
    Dim quantity As String = data.Get("quantity")   

           
'                ListView1.AddSingleLine (root.Get("message"))
'                ListView1.AddSingleLine (root.Get("status_code"))
                ListView1.AddSingleLine(customer_name)
                ListView1.AddSingleLine(customer_phone)
                ListView1.AddSingleLine(shipping_address)
                ListView1.AddSingleLine(shoped_date)
                ListView1.AddSingleLine(package_name)
                ListView1.AddSingleLine(quantity)
                ListView1.AddSingleLine(seller_name)
                ListView1.AddSingleLine(seller_phone)
                ListView1.AddSingleLine(next_place)
                ListView1.AddSingleLine(arrived_date)
                ListView1.AddSingleLine(complete)
                ListView1.AddSingleLine(error)
                ListView1.AddSingleLine(error_message)
                ListView1.SetSelection(0)

End Sub

Error

** Activity (main) Create, isFirst = true **


** Activity (main) Resume **


** Activity (main) Pause, UserClosed = true **


** Activity (main) Create, isFirst = true **


** Activity (main) Resume **


** Activity (main) Resume **


Error occurred on line: 95 (main)
java.lang.RuntimeException: Object should first be initialized (Map).


    at anywheresoftware.b4a.AbsObjectWrapper.getObject(AbsObjectWrapper.java:46)
    at anywheresoftware.b4a.objects.collections.Map.Get(Map.java:65)
    at java.lang.reflect.Method.invokeNative(Native Method)
    at java.lang.reflect.Method.invoke(Method.java:515)
    at anywheresoftware.b4a.shell.Shell.runMethod(Shell.java:636)
    at anywheresoftware.b4a.shell.Shell.raiseEventImpl(Shell.java:302)
    at anywheresoftware.b4a.shell.Shell.raiseEvent(Shell.java:238)
    at java.lang.reflect.Method.invokeNative(Native Method)
    at java.lang.reflect.Method.invoke(Method.java:515)
    at anywheresoftware.b4a.ShellBA.raiseEvent2(ShellBA.java:121)
    at anywheresoftware.b4a.BA$3.run(BA.java:319)
    at android.os.Handler.handleCallback(Handler.java:733)
    at android.os.Handler.dispatchMessage(Handler.java:95)
    at android.os.Looper.loop(Looper.java:136)
    at android.app.ActivityThread.main(ActivityThread.java:5142)
    at java.lang.reflect.Method.invokeNative(Native Method)
    at java.lang.reflect.Method.invoke(Method.java:515)
    at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:791)
    at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:607)
    at dalvik.system.NativeStart.main(Native Method)

 

[sirjo66]

I think that the line with the error is

Dim status_code As Int = root.Get("status_code")

because "status_code" exist only if ID code is not found.
Is it right ??

So, for to test if the system have found ID, you need to try to execute the line above, and catch the error
for example (not tested it):

Dim status_code As Int = -1
Try
    status_code = root.Get("status_code")
Catch
End Try

Select Case status_code
Case 200
    ' Your order still processing
    Dim message As String = root.Get("message")
    .....  and what I need to do
Case 404
    ' Order not found
    .....  and what I need to do
Case Else
    ...... ID found
End Select

 

[ivan.tellez]

Use this B4J Sample to generate code to parse your JSON data:


http://www.b4x.com/android/forum/threads/server-online-json-tree-example.39048/