Foxtable(狐表)用户栏目专家坐堂 → openqq内置窗口可以给微信公众号的用户发信息吗


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

主题:openqq内置窗口可以给微信公众号的用户发信息吗

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


加好友 发短信
等级:五尾狐 帖子:1131 积分:8199 威望:0 精华:0 注册:2013/11/3 19:00:00
  发帖心情 Post By:2021/5/31 13:01:00 [只看该作者]

微信直通

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


加好友 发短信
等级:三尾狐 帖子:646 积分:5691 威望:0 精华:0 注册:2017/4/7 12:15:00
  发帖心情 Post By:2021/5/31 18:21:00 [只看该作者]

终于打通了企业微信和OPENQQ,不过很奇怪,企业微信给OPENQQ发一条消息一下能收到三条。

Select Case e.path
    Case "wefox"

        Dim wbiz As New WXBizCrypt("ww0a6c789f5d232acb","foxtable","34ByrQ8gOftL1JgUy9gfNlwg6IHWs1WoYDAXMsQy7xf")
        If e.Request.HttpMethod = "GET"
            Dim ret As Integer = wbiz.CheckQYSignature(e)
            If ret <> 0 Then '如果接入验证失败
                Dim err As String = wbiz.GetErorDesc(ret) '获取错误描述
            End If
        ElseIf e.Request.HttpMethod = "Post"            '
            Dim st As New Date(1970,1,1,8,0,0)
            Dim msg  As String = wbiz.DecryptMsg(e) '解密消息
            If  IsNumeric(msg) Then '如果解密失败
                Dim err As String = wbiz.GetErorDesc(CInt(msg)) '获取错误描述
                Return
            End If
            Dim xo As Foxtable.XObject = Foxtable.XObject.Parse(msg)
            Select Case xo("MsgType")
                Case "text","image","voice","video","shortvideo"
Dim fucan As String=Functions.Execute("xm365find","Users","name","userid='" & xo("Fro mUserName").Tostring & "'")
QQServer.ForwardChatMessage(xo("Fro mUserName"),fucan,xo("Content"))
                  
            End Select
        End If
End Select

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


加好友 发短信
等级:超级版主 帖子:106285 积分:540554 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/31 19:58:00 [只看该作者]

原因:https://developers.weixin.qq.com/doc/offiaccount/Message_Management/Passive_user_reply_message.html

http://www.foxtable.com/mobilehelp/topics/0176.htm,过滤重复消息

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


加好友 发短信
等级:童狐 帖子:279 积分:3155 威望:0 精华:0 注册:2014/2/19 10:32:00
  发帖心情 Post By:2021/5/31 22:03:00 [只看该作者]

https://wechat.foxtable.com:9009/WebHelp/index.htm?page=we0188.htm
很早就有了

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


加好友 发短信
等级:七尾狐 帖子:1562 积分:12826 威望:0 精华:0 注册:2009/6/16 7:30:00
  发帖心情 Post By:2021/6/1 18:16:00 [只看该作者]

能否给出一个完整的开发的流程,保证OPenQQ如何实现信息发送。

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


加好友 发短信
等级:七尾狐 帖子:1562 积分:12826 威望:0 精华:0 注册:2009/6/16 7:30:00
  发帖心情 Post By:2021/6/1 19:02:00 [只看该作者]

一直内置窗口发送消息后微信没收到,不知道为什么?能否给一个完整的例子。

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


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

在WeChatMessageReceived事件把接收的消息,根据微信id调用公众号的接口向用户发送消息:http://www.foxtable.com/mobilehelp/topics/0179.htm


QQClient向微信发送信息

QQClient如果要向微信用户发送信息,首先必须用下面的方法添加微信用户:
AddWeChatUser
AddWeChatUsers

添加微信用户之后,可以通过内置聊天窗口直接向微信用户发送信息?图片或文件.
也可以用下面的方法向微信用户发送信息?图片或文件:

Send
SendFile
SendChatMessage
SendChatFile
SendChatImage

用这些方法发送消息的时候,将用户名参数设置为微信号即可,例如:

QQServer收到QQClient向微信用户发来的消息后,会触发服务端的WeChatMessageReceived,在这个事件中将收到的消息转发给对应的客户端......


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


加好友 发短信
等级:七尾狐 帖子:1562 积分:12826 威望:0 精华:0 注册:2009/6/16 7:30:00
  发帖心情 Post By:2021/6/1 21:09:00 [只看该作者]

在服务器端还是客户端,并没有说清楚

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


加好友 发短信
等级:七尾狐 帖子:1562 积分:12826 威望:0 精华:0 注册:2009/6/16 7:30:00
  发帖心情 Post By:2021/6/1 21:42:00 [只看该作者]

给一个案例吧,这样永远说不清的。因为需要弄清楚怎么把信息传递出去的。

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


加好友 发短信
等级:超级版主 帖子:106285 积分:540554 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/6/1 22:03:00 [只看该作者]

QQServer收到QQClient向微信用户发来的消息后,会触发服务端的WeChatMessageReceived,在这个事件中将收到的消息转发给公众号

 回到顶部
总数 26 上一页 1 2 3 下一页