以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么实现在服务器端写个项目 然后在客户端 根据服务器端的某个条件满足后 在客户端实现主窗体的打开与关闭?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175880)

--  作者:cnsjroom
--  发布时间:2022/3/22 23:04:00
--  怎么实现在服务器端写个项目 然后在客户端 根据服务器端的某个条件满足后 在客户端实现主窗体的打开与关闭?

怎么实现在服务器端写个项目  然后在客户端  根据服务器端的某个条件满足后  在客户端实现主窗体的打开与关闭?

 

 

服务器端创建会议议题   如果会议时间是当前系统时间  且会议正常开始时  客户端就弹出会议主窗体 

如果会议结束时  客户端就自动关闭会议主窗体

 

 

当前代码  先判断ip 然后再判断数据表  符合条件就打开窗体   还希望老师们指导下  其它更为合理的设计方案或思路   谢谢!

If Network.Ping("198.01.01.01") Then
    \'Messagebox.Show("该服务器可用")
   
    Dim bb As DataRow =DataTables("会议状态").Find("会议时间 = \'" & Date.today & "\'and 会议状态=true")
    If bb IsNot  Nothing  Then
        \'MessageBox.Show(1)
        Forms("主窗体").open
        If Forms("主窗体").opened Then
            Forms("主窗体").Controls("Label2").text= bb("会议主题")
            Forms("主窗体").Controls("TextBox3").text= bb("会议主题")
            MyTimers("计划1").Enabled = False
        End If
    Else
        \'MessageBox.Show("当前无正在进行的会议!")
        \'Forms("主窗体").Controls("TextBox2").text="当前无正在进行的会议!"
    End If
End If

[此贴子已经被作者于2022/3/23 1:30:50编辑过]

--  作者:有点蓝
--  发布时间:2022/3/23 8:28:00
--  
使用openqq:http://www.foxtable.com/webhelp/topics/2967.htm
--  作者:cnsjroom
--  发布时间:2022/3/23 8:56:00
--  求一个2020年商业版的安装包,感谢

不用openqq

 

主要是想实现电脑在启动后  项目先去判断数据库端的ip  然后再判断会议状态表中的条件    都满足后  项目主窗体再运行

如果会议中断  或者关闭项目主窗体后  系统又持续运行  后台判断条件  当条件满足的时候   又启动项目主窗体


--  作者:有点蓝
--  发布时间:2022/3/23 9:00:00
--  
那就是计划管理里,定时查询数据库的数据判断