openqq server在服务器上自动启动 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → openqq server在服务器上自动启动

共有2071人关注过本帖树形打印复制链接主题：openqq server在服务器上自动启动

lk15502

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：706 积分：4908 威望：0 精华：0 注册：2016/5/17 12:03:00

openqq server在服务器上自动启动 发帖心情

Post By：2017/5/4 10:22:00 [只看该作者]

在服务器上自动启动openqq server的程序，把程序加入到window启动；在openqq server的项目的afteropenproject中代码：

Forms("导航栏").Show()

MainTable = Tables("用户表")

Forms("OpenQQ Server").Open

Dim btn As WinForm.Button = Forms("OpenQQ Server").Controls("启动")

btn.PerformClick()

请问如何用代码判断openqq server已经启动，如果已经启动关闭窗口Forms("OpenQQ Server")，同时最小化openqq server;老师这个代码怎么写？

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/5/4 11:06:00 [只看该作者]

最小化：basemainform.windowstate = 1

主题：openqq server在服务器上自动启动