以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  新增复制行到表B  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189514)

--  作者:fangshen
--  发布时间:2023/12/6 10:07:00
--  新增复制行到表B
我想实现:表A的“计划保养日期”=今天,执行:表A的相关列,在表B中新增行后复制
下面代码能够实行:把“计划保养日期”从12月20日修改成今天,表B中马上会增加相关行

但是,昨天(12月5号)我把“计划保养日期”修改到12月6日,电脑没有关机,屏保状态,今天(12月6号),查看表B中没有相关新增行

今天我又把“计划保养日期”修改成2023年12月7日,然后把电脑的时间修改成12月6号23点28分,等到电脑显示12月7日后查看表B,也没有增加相关行

请教:不知道哪里出了问题?

表A,datacolchanged事件


If e.DataCol.Name = "计划保养日期" Then 
    If 
e.DataRow("计划保养日期") = date.today Then 
        Dim
 dr As DataRow  = DataTables("表B").addnew
        
dr("报修日期") =e.DataRow("计划保养日期")
        dr("原因分析") =e.DataRow("保养内容")
    End
 If
End
 If


--  作者:有点蓝
--  发布时间:2023/12/6 10:11:00
--  
请不要发重复的问题:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=189465