Foxtable(狐表)用户栏目专家坐堂 → 求助!


  共有5030人关注过本帖树形打印复制链接

主题:求助!

帅哥哟,离线,有人找我吗?
lwq603980601
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:295 威望:0 精华:0 注册:2022/9/19 20:27:00
求助!  发帖心情 Post By:2022/10/21 9:37:00 [只看该作者]

请问老师,这个ContentLength 字节写入请求流是什么意思?
图片点击可在新窗口打开查看此主题相关图片如下:错误.png
图片点击可在新窗口打开查看
Dim hc As New HttpClient("https://oapi.dingtalk.com/topapi/message/corpconversation/asyncsend_v2?access_token = 8eae690cd19338bf8a9632a4467caad1")

Dim jo As New JObject
jo("agent_id") = "1373649751"
jo("userid_list") = "01531106431720838456"
jo("msgtype") = "text"
jo("text") = New JObject
jo("text")("content") = "今晚加班"

hc.Content = jo.ToString()
jo = JObject.Parse(hc.GetData())
If jo("errcode") = "0" Then
    MessageBox.show("消息发送成功!")
Else
    MessageBox.show("消息发送失败,原因:" & vbcrlf & jo("errmsg").ToString)
End If



必须先将 ContentLength 字节写入请求流,然后再调用 [Begin]GetResponse。



 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106690 积分:542645 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/21 9:48:00 [只看该作者]

截图的提示是没有结果返回,不能转换为json

hc.Content = jo.ToString()
dim ret as string = hc.GetData()
msgbox(ret)

必须先将 ContentLength 字节写入请求流,然后再调用 [Begin]GetResponse。】这个应该是没有按照接口文档的要求调用接口导致的

 回到顶部
帅哥哟,离线,有人找我吗?
lwq603980601
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:295 威望:0 精华:0 注册:2022/9/19 20:27:00
  发帖心情 Post By:2022/10/21 10:20:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:网站.png
图片点击可在新窗口打开查看
json转换没有问题,网页连接也没有问题
图片点击可在新窗口打开查看此主题相关图片如下:json.png
图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106690 积分:542645 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/21 10:27:00 [只看该作者]

去掉多余的空格

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
lwq603980601
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:295 威望:0 精华:0 注册:2022/9/19 20:27:00
  发帖心情 Post By:2022/10/21 10:35:00 [只看该作者]


必须先将 ContentLength 字节写入请求流,然后再调用 [Begin]GetResponse。】还是这个错误,然后返回了个空页面,网页连接通了,应该是传过去的json格式有问题吧
图片点击可在新窗口打开查看此主题相关图片如下:返回.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
lwq603980601
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:295 威望:0 精华:0 注册:2022/9/19 20:27:00
  发帖心情 Post By:2022/10/21 10:37:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:要求.png
图片点击可在新窗口打开查看
Dim jo As New JObject
jo("agent_id") = "1373649751"
jo("userid_list") = "01531106431720838456"
jo("msg") = New JObject
jo("msg")("msgtype") = "text"
jo("text") = New JObject
jo("text")("content") = "今晚加班"


应该是这个msg的格式问题吧
图片点击可在新窗口打开查看此主题相关图片如下:json格式.png
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106690 积分:542645 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/21 10:38:00 [只看该作者]

这个您要去自己核对接口开发文档了

 回到顶部
帅哥哟,离线,有人找我吗?
lwq603980601
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:295 威望:0 精华:0 注册:2022/9/19 20:27:00
  发帖心情 Post By:2022/10/21 10:42:00 [只看该作者]

感谢解答图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106690 积分:542645 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/21 10:43:00 [只看该作者]

Dim jo As New JObject
jo("agent_id") = "1373649751"
jo("userid_list") = "01531106431720838456"
jo("msg") = New JObject
jo("msg")("msgtype") = "text"
jo("msg")("text") = New JObject
jo("msg")("text")("content") = "今晚加班"

 回到顶部
帅哥哟,离线,有人找我吗?
lwq603980601
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:295 威望:0 精华:0 注册:2022/9/19 20:27:00
  发帖心情 Post By:2022/10/21 11:27:00 [只看该作者]

感谢老师的帮助,显示出来了图片点击可在新窗口打开查看

 回到顶部
总数 11 1 2 下一页