按杰哥分享的方法,狐表软件是可以启用了,但是openqq服务不能启动。
我在狐表里有一个网络内部表格,表格里有一些信息,我在 AfterOpenProject写了以下代码:
QQServer.Stop()
QQServer.ServerIp = Tables("网络").Current("IP")
QQServer.ServerPort = Tables("网络").Current("Port")
QQServer.HeartbeatInterval = Tables("网络").Current("Interval")
QQServer.HeartbeatTimeout = Tables("网络").Current("Timeout")
QQServer.PortRange = Tables("网络").Current("Range")
QQServer.Start() '启动QQServer
但是,狐表启动后,这个代码并没起作用??因为我客户端连接不上openqq.
当我去手动运行一下以上这个代码的时候, 客户端就可以连接上openqq的。
是不是说明我在AfterOpenProject事件里写的代码,其实并没有运行?
那么代码应该加在哪里呢?
调试看看
msgbox("open")
QQServer.Stop()
QQServer.ServerIp = Tables("网络").Current("IP")
QQServer.ServerPort = Tables("网络").Current("Port")
QQServer.HeartbeatInterval = Tables("网络").Current("Interval")
QQServer.HeartbeatTimeout = Tables("网络").Current("Timeout")
QQServer.PortRange = Tables("网络").Current("Range")
QQServer.Start() '启动QQServer
msgbox(QQServer.Ready)
说明代码已经执行,服务端已经正常启动。自己加代码调试看看Tables("网络").Current里面的内容