B4R Question Byte() to string, string to byte in http request

[petr4ppc]

Dear friends , please, I have code:

dim a() as byte
a=byteconvert.StringFromBytes(Queue.FirstItem)
Log(a) 'here I see the expected number, for example: 1234
gotoweb(a)

Sub gotoweb (a() As Byte)       '  Sub gotoweb (a() As string)   '  declaration "Sub gotoweb(a() as string)" is not functioned. I get the same error as with: a() as byte
    Log(a) 'here I see the expected number, for example: 1234
    Dim nr As String =a       ' when i use this , then http request is not NOT FUNCTIONED
     ' Dim nr As String ="1234"  ' but when I use this row (declaration), then http request is FUNCTIONED perfectly
    HttpJob.Initialize("x")
    Dim string() As Byte ="http://www.abc.com/go.php?a="
    string=JoinBytes(Array(string,nr.getbytes))           'NOT FUNCTIONED with Dim nr As String =a
    'string=JoinBytes(Array(string,nr))                         'NOT FUNCTIONED with Dim nr As String =a
    log(string)    ' here I see "http://www.abc.com/go.php?a=1234"  which is functioned in explorer, but it is not functioned in ESP (wth declaration: Dim nr As String =a)
    HttpJob.AddHeader("Content-Type", "application/x-www-form-urlencoded")
    HttpJob.Post(string,"")
End Sub

After HttpJob.Post(string,"") ESP module is
A) restarted, I see in terminal(in logs) this error:

rst cause:4
wdt reset

or
B) I get from JobDone "NOK"

    If Job.JobName="x" Then
        If Job.Success Then
                Log("OK")
            Else
                Log("NOK")
                 Log("ErrorMessage: ", Job.ErrorMessage)
                 Log("Status: ", Job.Status)
                 Log(Job.Response)   
        End If
    End If

JobName: x
NOK
ErrorMessage:
Status: 400
<html>
<head><title>400 Bad Request</title></head>
<body>
<center><h1>400 Bad Request</h1></center>
<hr><center>nginx</center>
</body>
</html>

but the address for demonstrating: http://www.abc.com/go.php?a=1234 in chrome explorer is functioned..
or
C) Everything is OK as I decribed only if I use row: ' Dim nr As String ="1234" ' when I use this row (declaration), then http request is FUNCTIONED perfectly

I am sending pic with complete error description (but I think, some informations described on pic are not important, because the reason why code is not functioned I am describing directly in the code)
what I am doing wrong, please?
Best regards
pppc

I am watching:

[module] rHttpUtils2 - Http Client

The HttpJob module implements an http client. It is a simplified version of B4X HttpUtils2. Example: Sub Process_Globals Public Serial1 As Serial Private wifi As ESP8266WiFi End Sub Private Sub AppStart Serial1.Initialize(115200) Log("AppStart") If wifi.Connect("dlink") Then...

www.b4x.com

Strings and Bytes

B4R strings are different than in other B4X tools. The reasons for these differences are: 1. Very limited memory. 2. Lack of Unicode encoders. A String object in B4R is the same as C char* string. It is an array of bytes with an additional zero byte at the end. The requirement of the last zero...

www.b4x.com

but I can not fing solution

 

[Erel]

Please use [code]code here...[/code] tags when posting code.

And post the logs as text.

 

[petr4ppc]

Dear Erel, dear friends,

edit of text is done.
Please for advice, what I am doing wrong.

Best regards,
p4ppc

 

[Erel]

My guess: the url redirects to a different one and this causes an internal call with CallSubPlus. The string you created on the stack becomes invalid.

The solution is to use GlobalStore to store the string (or better the array of bytes): https://www.b4x.com/android/forum/threads/module-globalstore-global-objects-storage.73863/#content

 

[RJB]

Shouldn't that be :

Dim a as string
Dim BC as byte ByteConverter
    a = BC.StringFromBytes(Queue.FirstItem)
gotoweb(a)

Sub gotoweb (a As String)