以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [灌水]请问OpenQQ客户端项目加载  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78962)
--  作者：Liuxinyu
--  发布时间：2015/12/21 16:11:00
--  [灌水]请问OpenQQ客户端项目加载
您好！

请问：OpenQQ客户端程序，什么时候被加载到项目中，是外部数据源连接前　或外部数据源连接后，或是......?
--  作者：大红袍
--  发布时间：2015/12/21 16:19:00
--  

 这种，你测试一下不就行了？

 

 任何事件都可以用如 QQClient.ServerIP = "127.0.0.1"
--  作者：Liuxinyu
--  发布时间：2015/12/22 16:28:00
--  
似乎只能运行在项目加载之后了。
--  作者：大红袍
--  发布时间：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