以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]OpenQQ 无法接收离线消息  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=163814)

--  作者:kensou11111
--  发布时间:2021/4/25 19:33:00
--  [求助]OpenQQ 无法接收离线消息
我在本机上测试OpenQQ,在服务端运行以下代码,为何客户端无法接收离线消息,只能接收到在线消息?QQserver 是按照帮助的例子来设置的。


QQServer.Send("B.李四","测试信息",True)



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


--  作者:有点蓝
--  发布时间:2021/4/25 20:56:00
--  
测试没有问题。使用代码发送的消息只能到ReceivedMessage事件接收。请到客户端ReceivedMessage事件写代码接收
--  作者:kensou11111
--  发布时间:2021/4/25 23:45:00
--  
确实是在客户端的ReceivedMessage事件接收的,代码如下,只能收到在线消息,无法收到离线消息。


Dim str As String = e.Message

Dim dr As DataRow = DataTables("表A").AddNew
dr("发送者") = iif(e.UserName > "",e.UserName,"服务器")
dr("时间") = Date.Now()
dr("信息") = str

PopMessage(str,"提示", PopIconEnum.Infomation)


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

[此贴子已经被作者于2021/4/25 23:47:26编辑过]

--  作者:kensou11111
--  发布时间:2021/4/26 0:04:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:desktop.rar


这是测试项目

--  作者:有点蓝
--  发布时间:2021/4/26 9:06:00
--  
测试是因为这个用户没有好友,添加一个好友即可。这个问题已经反馈,看下个版本能不能改进
--  作者:kensou11111
--  发布时间:2021/4/26 9:25:00
--  
测试了一下,给所有登录的OpenQQ用户统一加上了一个好友,现在离线消息已经可以正常收到了。