Android Question Translate java request to b4a

[cliv]

    public String checkCod(String sCod) {
        JSONParser jsonParser = new JSONParser();
        try {
            List<NameValuePair> params = new ArrayList();
            params.add(new BasicNameValuePair("id", "2"));
            params.add(new BasicNameValuePair("key", "XXXXXXX"));
            params.add(new BasicNameValuePair("cod", sCod));
            JSONObject obj = jsonParser.makeHttpRequest(this.IP, params);
            if (obj.getString("status").toString().equals("1")) {
                return obj.getJSONObject("data").getString("content").toString();
            }
            return obj.getString("error_message").toString();
        } catch (Exception e) {
            e.printStackTrace();
            return null;
        }
    }

How can i translate this to b4a?

 

[DonManfred]

Use b4a jsonparser from JSON Library

You can use the online tool
http://basic4ppc.com:51042/json/index.html
and parse a json. The tool give you the b4a code to parse this json.

 

[cliv]

Use b4a jsonparser from JSON Library

You can use the online tool
http://basic4ppc.com:51042/json/index.html
and parse a json. The tool give you the b4a code to parse this json.

No ...i want to translate code from java to b4a...

 

[DonManfred]

Why if there is a jsonparser available in B4A already?

 

[cliv]

I know to parse json i want to translate sub code to b4a

    Dim hc As HttpClient
    Sub Activity_Create(FirstTime As Boolean)

        hc.Initialize("hc")
 
        Dim post As HttpRequest
        Dim strReq As String
        strReq = "id=2" & "&key=XXXXXXX" & "&cod=" & sCod
        post.InitializePost2(IP, strReq.GetBytes("UTF8"))
        hc.Execute(post, 1)
    End Sub

I try this....

 

[DonManfred]

You should use okhttputils2 instead of httprequest.

 

[cliv]

You should use okhttputils2 instead of httprequest.

Thank you