主题：【已解决】[求助]请问狐表能写http的请求吗？钉钉群机器人

2、在客户端项目的命令窗口执行下面的代码，会提示服务器收到的数据：

Dim hc As New HttpClient("http://127.0.0.1/test.htm")
hc.Timeout = 5 '设置超时为5秒
hc.Content = "我是Foxtable"
Dim ret As String = hc.GetData()
MessageBox.Show(ret)

FeedCard类型

{
    "feedCard": {
        "links": [
            {
                "title": "时代的火车向前开", 
                "messageURL": "https://www.dingtalk.com/s?__biz=MzA4NjMwMTA2Ng==&mid=2650316842&idx=1&sn=60da3ea2b29f1dcc43a7c8e4a7c97a16&scene=2&srcid=09189AnRJEdIiWVaKltFzNTw&from=timeline&isappinstalled=0&key=&ascene=2&uin=&devicetype=android-23&version=26031933&nettype=WIFI", 
                "picURL": "https://www.dingtalk.com/"
            },
            {
                "title": "时代的火车向前开2", 
                "messageURL": "https://www.dingtalk.com/s?__biz=MzA4NjMwMTA2Ng==&mid=2650316842&idx=1&sn=60da3ea2b29f1dcc43a7c8e4a7c97a16&scene=2&srcid=09189AnRJEdIiWVaKltFzNTw&from=timeline&isappinstalled=0&key=&ascene=2&uin=&devicetype=android-23&version=26031933&nettype=WIFI", 
                "picURL": "https://www.dingtalk.com/"
            }
        ]
    }, 
    "msgtype": "feedCard"
}

示例三

生成包括嵌套对象的JSON。

在命令窗口执行：

Dim jo As New JObject
jo("name") = "李云龙"
jo("age") = "36"
jo("card") = New JObject
jo("card")("bank") = "工行"
jo("card")("account") = "12345678"
Output.Show(jo.ToString)

显示的结果为：

{
  "name": "李云龙",
  "age": "36",
  "card": {
    "bank": "工行",
    "account": "12345678"
  }
}