Foxtable(狐表)用户栏目专家坐堂 → [灌水]请问OpenQQ客户端项目加载


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

主题:[灌水]请问OpenQQ客户端项目加载

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


加好友 发短信
等级:幼狐 帖子:182 积分:1634 威望:0 精华:0 注册:2012/1/4 13:13:00
[灌水]请问OpenQQ客户端项目加载  发帖心情 Post By:2015/12/21 16:11:00 [只看该作者]

您好!

请问:OpenQQ客户端程序,什么时候被加载到项目中,是外部数据源连接前 或外部数据源连接后,或是......?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/21 16:19:00 [只看该作者]

 这种,你测试一下不就行了?

 

 任何事件都可以用如 QQClient.ServerIP = "127.0.0.1"


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


加好友 发短信
等级:幼狐 帖子:182 积分:1634 威望:0 精华:0 注册:2012/1/4 13:13:00
  发帖心情 Post By:2015/12/22 16:28:00 [只看该作者]

似乎只能运行在项目加载之后了。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/22 16:34:00 [只看该作者]

测试了一下,没问题啊,beforeOpenProject执行代码,如

 

msgbox(2)
If QQClient.Ready Then
    MessageBox.show("QQClient已经启动,请先关闭","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
End If
QQClient.ServerIP = "127.0.0.1"
QQClient.ServerPort = "52177"
QQClient.UserName = "生产部.李桂兰"
QQClient.Password = "888"
If QQClient.Start() = True '如果登录成功
    popMessage("成功","提示",PopiconEnum.Infomation,5)
Else '如果登录失败,显示服务器返回错误信息
    PopMessage("QQClient登录失败,原因:" & vbcrlf & QQClient.ServerMessage,"提示",PopiconEnum.Error,5)
End If


 回到顶部