B4J Question How to read json post

[Pablo Torres]

Hi everyone, sorry to disturb, have been searching for days about this but havent found anything.

If I have a jserver running in (example) "https://myserverapi.com" and I send a poststring to "https://myserverapi.com?method=getcards" with the following post: {"idevento":5,"filter":"NO"}... I understand that with req.GetParameter("methhod") I obtain the value "getcards"... but how do I obtain the values 5 and "NO"?

I'm pretty sure it is a silly question, but would be great to have it answered


Many thanks

 

[jahswant]

 if req.Method.ToUpperCase = "POST" Then
         Dim data() As Byte = Bit.InputStreamToBytes(req.InputStream)
        Log(BytesToString(data, 0, data.Length, "UTF-8"))
    End If

Read POST request??

hi i would like to know what is the proper way to read a POST request in b4j Server App? this is the Post request: Private Sub addNewUser Dim j As HttpJob j.Initialize("", Me) Dim json As JSONGenerator...

www.b4x.com

 

[DonManfred]

Use this page to get the Sourrce on how to parse the json

http://basic4ppc.com:51042/json/index.html

 

[aeric]

Similar to @jahswant 's answer, I have a function in my WebApiUtils which read the posted JSON data string into B4X Map.

Public Sub RequestData (Request As ServletRequest) As Map
    Dim data As Map
    Dim inp As InputStream = Request.InputStream
    If inp.BytesAvailable <= 0 Then
        Return data
    End If
    Dim buffer() As Byte = Bit.InputStreamToBytes(inp)
    Dim str As String = BytesToString(buffer, 0, buffer.Length, "UTF-8")
    data = str.As(JSON).ToMap
    Return data
End Sub

 

[aeric]

Take note if you also want to read the parameter "method=getcards"

Tip about POST requests: if you want to get a URL parameter (req.GetParameter) then do it only after reading the payload, otherwise the payload will be searched for the parameter and will be lost.

 

[Pablo Torres]

 if req.Method.ToUpperCase = "POST" Then
         Dim data() As Byte = Bit.InputStreamToBytes(req.InputStream)
        Log(BytesToString(data, 0, data.Length, "UTF-8"))
    End If

Read POST request??

hi i would like to know what is the proper way to read a POST request in b4j Server App? this is the Post request: Private Sub addNewUser Dim j As HttpJob j.Initialize("", Me) Dim json As JSONGenerator...

www.b4x.com

That works! Many Thanks

 

[Pablo Torres]

Use this page to get the Sourrce on how to parse the json

http://basic4ppc.com:51042/json/index.html

I am sending json from b4a to b4j, with JsonGenerator and JsonParser both sides, should I use this instead?

 

[Pablo Torres]

Take note if you also want to read the parameter "method=getcards"

Noted! Many thanks