Dim requestData As String = "{'OrderCode':'','ShipperCode':'YTO','LogisticCode':'806954566449701663'}"
Dim obj As new KdApiSearchDemo
e.Form.Controls("TextBox1").Text = obj.getOrderTracesByJson(requestData )
Dim jo As JObject = Jobject.Parse(e.Form.Controls("TextBox1").Text)
MessageBox.Show(jo("Traces")(0)("AcceptStation").ToString)