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


  共有1948人关注过本帖平板打印复制链接

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

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


加好友 发短信
等级:三尾狐 帖子:705 积分:4897 威望: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;老师这个代码怎么写?

 回到顶部