以文本方式查看主题

-  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=76900)

--  作者:xianzheng
--  发布时间:2015/11/7 11:42:00
--  [求助]OpenQQ客户端收到信息后触发问题?

 [求助]OpenQQ客户端收到信息后希望能在右下角提示信息, 我在ReceivedMessage事件中写了以下代码,但运行时收到信息没有出现提示,如何修改呢?代码好象没题,什么原因呢?

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

Dim msg As String =  "你有新的信息!"
popMessage(msg,"提示",PopiconEnum.Infomation,5)

[此贴子已经被作者于2015/11/7 12:45:28编辑过]

--  作者:Hyphen
--  发布时间:2015/11/7 11:51:00
--  
代码测试没有问题,想改什么
--  作者:xianzheng
--  发布时间:2015/11/7 11:57:00
--  
 哪我这边收信息后,右下角没有出现提示?什么原因呢
--  作者:xianzheng
--  发布时间:2015/11/7 12:00:00
--  
我这里信息收发都正常,就这个推送没有反应,不知道什么原因,所以我就想代码是不是写错了
--  作者:Hyphen
--  发布时间:2015/11/7 12:07:00
--  
是不是被其它软件给挡住或者拦截了
--  作者:xianzheng
--  发布时间:2015/11/7 12:30:00
--  
 应该没有,我试把它放到菜单sysfemIdle事件中可以推送显示出来,但提示的信息不能关闭
--  作者:xianzheng
--  发布时间:2015/11/7 12:35:00
--  

现在还发现一个问题“Dim dr As DataRow = DataTables("信息").AddNew”,这行代码也没有增加新行,客户端我用的是外部数据表,是这个原因吗


--  作者:xianzheng
--  发布时间:2015/11/7 12:41:00
--  
好象 ReceivedMessage事件没起作用,没有任何反应
--  作者:xianzheng
--  发布时间:2015/11/7 13:14:00
--  
 我试用CaseStudy里面的例子操作,ReceivedMessage事件没起作用也没有反应,它们是内部表,什么原因呀?
--  作者:Hyphen
--  发布时间:2015/11/7 13:57:00
--  

只有用Sand、SendWait方法推送的消息,ReceivedMessage事件才起作用

 

http://www.foxtable.com/help/topics/2977.htm