以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]外部数据表的更新问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104328) |
-- 作者:13968559581 -- 发布时间:2017/7/27 14:24:00 -- [求助]外部数据表的更新问题 本人另外有套考勤系统,现将该考勤系统的考勤流水表作为外部数据表,我想实现:一旦有员工打卡,马上能触发某事件 我用该外部数据表的datarowadded事件来操作,感觉不行,请教一下正确的处理方式,谢谢
|
-- 作者:有点甜 -- 发布时间:2017/7/27 14:35:00 -- 你可以做个定时器,定时去检测后台数据库的行数。如果行数增加,就对比前后的数据,执行你的逻辑代码。
无法做到以打开就知道的。除非你的定时器间隔很小。 |
-- 作者:13968559581 -- 发布时间:2017/7/27 15:27:00 -- 你好,我代码这么写 Dim lb3 As WinForm.Label = e.Form.Controls("Label3") Dim i As Integer If i<>DataTables("易考勤明细表").Compute("count(rtime)") Then i=DataTables("易考勤明细表").Compute("count(rtime)") lb3.text=i End If 这个 i 理论在我打卡一次后,就自动增加1的,但不行 我估计就是怎么去检测这个后台数据库的问题了,这怎么办,谢谢
|
-- 作者:有点甜 -- 发布时间:2017/7/27 15:50:00 -- Dim lb3 As WinForm.Label = e.Form.Controls("Label3")
Dim i As Integer = val(lb3.text)
Dim count As integer = DataTables("易考勤明细表").sqlCompute("count(rtime)")
If i<>count Then
lb3.text=count
End If |
-- 作者:13968559581 -- 发布时间:2017/7/27 16:15:00 -- 可以了 谢谢,sqlCompute 这个我不会用的原因 |