110,499
社区成员
发帖
与我相关
我的任务
分享
parameters.Add("ts", DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss"));
Dictionary<string, string> data = TransformData(parameters);
String param = TransformURL(data);
System.Console.WriteLine(param);
HttpWebRequest request = (System.Net.HttpWebRequest)WebRequest.Create("http://dev.api.meyoung.cn/user/verify?" + param);
request.Method = "post";
HttpWebResponse response = (System.Net.HttpWebResponse)request.GetResponse();
mycart = "{ model_1: ' CM1_05 ' , " + "model_2: ' CM2_12 ' , " + "locate_status: ' 1 ' }";
System.Web.Script.Serialization.JavaScriptSerializer jss = new JavaScriptSerializer();
CarList list = jss.Deserialize<CarList>(mycart);
List<CarList> lisa = new List<CarList>();
lisa.Add(list);
this.Repeater1.DataSource = lisa;
this.Repeater1.DataBind();
以上这种格式的json 可以转换
但是下面这种格式如何转换 请高手出招了
{"result": {"total_results": 7, "car_lists": [{"model_2": "CM2_05", "plate_number": "\u95fdCRA262", "expected_flow": "", "driver_gender": "", "description": "", "locate_status": 1, "model_3": "", "located_time": "", "driver_id_number": "", "volume": "", "width": "", "length": 4.2000000000000002, "driver_name": "\u5f90", "model_1": "CM1_01", "location": "", "tonnage": 11.0, "locate_number": "13850754219", "height": "", "model_4": ""}, {"model_2": "CM2_13", "plate_number": "\u5409A12311", "expected_flow": "\u4e0a\u6d77\u5e02,\u676d\u5dde\u5e02,\u6d4e\u5357\u5e02", "driver_gender": "", "description": "fddsfs", "locate_status": 0, "model_3": "", "located_time": "", "driver_id_number": "", "volume": "", "width": "", "length": 12.0, "driver_name": "13fsdfsd", "model_1": "CM1_16", "location": "", "tonnage": 111.0, "locate_number": "15659826026", "height": "", "model_4": ""}], "register_contact_number": "13850754219"}, "success": true}
Sub test()
Set ms = CreateObject("MSScriptControl.ScriptControl")
Set mx = CreateObject("Microsoft.XMLHTTP")
ms.Language = "JScript"
mx.Open "GET", "http://dev.api.meyoung.cn/user/verify?", False
mx.send
ss = "a=" & mx.responsetext
ms.AddCode ss
Debug.Print ms.eval("a.success")
Debug.Print ms.eval("a.error.message")
Debug.Print ms.eval("a.error.code")
End Sub