Foxtable(狐表)用户栏目专家坐堂 → [求助]OpenQQ 离线触发


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

主题:[求助]OpenQQ 离线触发

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


加好友 发短信
等级:小狐 帖子:350 积分:2927 威望:0 精华:0 注册:2015/4/23 19:53:00
[求助]OpenQQ 离线触发  发帖心情 Post By:2017/5/23 0:07:00 [显示全部帖子]

老师 您好

  OpenQQ  如果离线时(除关闭项目外),弹出一个对话框,提示用户。

下面的代码出错,离线后不停的在触发Disconnected事件,不停的在弹力出对话框,您看下要怎么弄。是不是思路不对。谢谢

 

Disconnected事件代码如下:

If MessageBox.Show("您的账号在其它地方登录!" & "是否重新登录?","下线提示",MessageBoxButtons.YesNo,MessageBoxIcon.Error) = DialogResult.Yes
    Forms("重新登录").Show
Else
    Syscmd.Project.Exit(True)
End If


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


加好友 发短信
等级:小狐 帖子:350 积分:2927 威望:0 精华:0 注册:2015/4/23 19:53:00
  发帖心情 Post By:2017/5/23 23:59:00 [显示全部帖子]

老师 这样不行呀  

   关闭系统时,也会弹出窗口,而且点击退出按钮都不行,点退出后不停弹力出此窗口(感觉判断窗口打开没效果一样),一定要点重新登录才能关闭。


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


加好友 发短信
等级:小狐 帖子:350 积分:2927 威望:0 精华:0 注册:2015/4/23 19:53:00
  发帖心情 Post By:2017/5/24 10:26:00 [显示全部帖子]

加了这个全局变量就ok了  谢谢老师


 回到顶部