question

WebSpider-5357 avatar image
0 Votes"
WebSpider-5357 asked JackJJun-MSFT edited

error: Illegal characters in path. (JsonArray)

Hi, I got an error [Illegal characters in path.] in this line
Dim jsonString As String = (New StreamReader(responseFromServer)).ReadToEnd()

The [responseFromServer] is returned the following:
{"type":"SALES","totalFee":"14.80","Currency":"SGD"}

How can i check each item in JsonArray?

             Dim WebResponse As WebResponse = WebRequest.GetResponse()
             Dim httpResponse As HttpWebResponse = CType(WebResponse, HttpWebResponse)
    
             dataStream = WebResponse.GetResponseStream()
    
             If httpResponse.StatusCode = "200" Then
    
                 Dim reader As StreamReader = New StreamReader(dataStream)
                 Dim responseFromServer As String = reader.ReadToEnd()
    
                 Try
    
                     Dim jsonString As String = (New StreamReader(responseFromServer)).ReadToEnd()
                     Dim jsonArray As JArray = CType(JsonConvert.DeserializeObject(jsonString), JArray)
    
                     For Each item In jsonArray
                         If item("Currency") = "SGD" Then
                             //Do something
                         End If
                     Next
    
         Catch ex As Exception
             Response.Write(ex.Message)
         End Try
    
                 reader.Close()
    
             Else
                 Response.Write("Something went wrong.")
             End If

dotnet-visual-basic
5 |1600 characters needed characters left characters exceeded

Up to 10 attachments (including images) can be used with a maximum of 3.0 MiB each and 30.0 MiB total.

1 Answer

Viorel-1 avatar image
0 Votes"
Viorel-1 answered

Check this example, then integrate it:

 Dim responseFromServer As String = "{""type"":""SALES"",""totalFee"":""14.80"",""Currency"":""SGD""}"
    
 Dim jsonString = responseFromServer
 Dim obj = JsonConvert.DeserializeObject(jsonString)
    
 If obj("Currency") = "SGD" Then
     ' Do something
     MsgBox("Something")
 End If

5 |1600 characters needed characters left characters exceeded

Up to 10 attachments (including images) can be used with a maximum of 3.0 MiB each and 30.0 MiB total.