执行代码:
Dim str4 As String = "http://172.16.*.*:2000/Auth.asmx/Bedinfo_query?xml=<xml><nurse_cell_code>0494</nurse_cell_code></xml>"
Dim hc As New HttpClient(str4)
Dim ret As String = hc.GetData()
MessageBox.Show(ret) '可以弹出返回值
Dim xmlDoc As New System.XML.XmlDocument
xmlDoc.Loadxml(ret)
Dim ndList = xmlDoc.GetElementsByTagName("string")
Dim json = ndList(0).innerText
Dim jo As JArray=JArray.parse(json)
' msgbox(jo(0)("金额") )
' msgbox(jo(0)("BED_NO") )
返回错误:
此主题相关图片如下:1.png
返回的json如下:
此主题相关图片如下:1.png
请问是什么问题?