以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口定时刷新问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=50162)

--  作者:tina2012
--  发布时间:2014/4/30 14:09:00
--  窗口定时刷新问题
怎么定时(每五分钟)刷新窗口,窗口中上方绑定订单主表,下方绑定订单明细表。   
--  作者:Bin
--  发布时间:2014/4/30 14:11:00
--  
用窗口的计时器.   5分钟执行一次  tables("窗口1_Table1").datatable.load
--  作者:tina2012
--  发布时间:2014/4/30 15:26:00
--  
不想使用按钮,要求打开该窗口时就进行自动刷新,怎么不可以呢?还需要点击“开始”按钮才可以。

TimerTick事件中代码:
点击“开始”按钮才开始自动刷新,怎么打开该窗口时就进行自动刷新呢??
e.Form.TimerEnabled = True
e.Form.TimerInterval = 60000           
Dim Lbl As WinForm.Label =  e.Form.Controls("Label1")
If  Lbl.ForeColor = Color.Red Then
    Lbl.ForeColor = Color.Black
    DataTables("Sales_Order_List").LoadFilter = "完成 = \'未完成\'"                             \'设置加载条件
    DataTables("Sales_Order_List").Load
    DataTables("Sales_Order_List").LoadChildren("Sales_Order_Product")   \'每次加载订单后,能同步加载这些订单的订单明细
Else
    Lbl.ForeColor = Color.Red
End If

--  作者:Bin
--  发布时间:2014/4/30 15:30:00
--  
窗口属性中,把启用设置为TURE
--  作者:tina2012
--  发布时间:2014/4/30 15:41:00
--  
好的,谢谢