Dim j As HttpJob
j.Initialize("",Me)
Dim str As String = "http://194.5.205.91:3333/api/v1/client/user/info"
'Dim str1 As String = $"birthdate=${txtBirthDate.Text}&email=${txtEmail.Text}&fullname=${txtName.Text}&tel=${txtTel.Text}&nationalcode=123456&mobile=${txtMobile.Text}"$
Dim urlInfo as Map = CreateMap("birthdate" : txtBirthDate.Text, "email" : txtEmail.Text, "fullname" : txtName.Text, "tel" : txtTel.Text, "nationalcode" : "123456", "mobile" : txtMobile.Text)
Log($"${str}?${UrlEncodeMap(urlInfo)}"$) ' This should give you an idea of what the URL looks like for the PUT call
j.PutString($"${str}?${UrlEncodeMap(urlInfo)}"$,"")
j.GetRequest.SetHeader("authorization",Public_mdl.Token)
Wait For (j) jobdone (j As HttpJob)
hud.ProgressDialogHide
If j.Success Then
Dim str As String = j.GetString
Log(str)
nav.RemoveCurrentPage
Else
Log(j.ErrorMessage)
End If