以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]企业微信群机器人请教  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145734)

--  作者:foxtable-hg
--  发布时间:2020/2/6 0:57:00
--  [求助]企业微信群机器人请教
企业微信群机器人配置说明如下:
curl \'http://qyapi.weixin.qq.com/cgi-bin/webhook/send?key=633a31f6-7f9c-4bc4-97a0-0ec1eefa5898\' \\
-H \'Content-Type: application/json\' \\
-d \'
{
"msgtype": "text",
"text": {
"content": "hello world"
}
}\'

参考帮助文档,代码写为
Dim URL As String = "https://qyapi.weixin.qq.com/cgi-bin/webhook/send?key=XXXX"
Dim hc As New HttpClient(URL)
hc.Co ntentType = "a pplication/json; charset=UTF-8"
Dim jo2 As New JObject
jo2("msgtype") = "text"
jo2("text") = New JObject
jo2("text")("content") = Str
hc.Content = jo2.ToString
\'MessageBox.Show(jo2.ToString)

但是无法实现,配置说明中要求使用的是构造post data向webhook地址发起HTTP POST 请求就可以,这段代码怎么写,老师能指教一下么,谢谢老师。


--  作者:有点蓝
--  发布时间:2020/2/6 8:50:00
--  
……
hc.Content = jo2.ToString
dim ret  as string = hc.GetData()
MessageBox.Show(ret )

--  作者:foxtable-hg
--  发布时间:2020/2/6 11:12:00
--  
谢谢有点蓝老师 OK了   就是getdata这个方法的作用没有搞明白。。
--  作者:有点蓝
--  发布时间:2020/2/6 11:34:00
--  
理解为提交post的意思即可,前面其它代码相当属于各种设置,调用getdata才把这些设置提交到接口
--  作者:foxtable-hg
--  发布时间:2020/2/6 12:02:00
--  
谢谢蓝老师指导。
--  作者:yifan3429
--  发布时间:2022/1/10 21:08:00
--  
楼主机器人配置可以提供实例学习吗