Dim hc As New HttpClient("http://10.1.1.110/v1/oauth/accessToken")
hc.ContentType = "application/json" Dim jo As New JObject jo("appKey") = "appKey" jo("appSecret") = "appSecret" hc.Content = jo.ToString Dim ret AsString = hc.GetData() MessageBox.Show(ret)
加好友 
发短信
Post By：2024/3/28 13:50:00 [只看该作者]
