以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  按条件刷新数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=192710)

--  作者:1234567
--  发布时间:2024/7/15 14:32:00
--  按条件刷新数据
LockBaseMainForm()

DataTables("任务单").StopRedraw()
DataTables("任务单").RemoveFor("更新时间  = #" & Date.Today & "#")
DataTables("任务单").AppendLoad("更新时间  = #" & Date.Today & "#")
DataTables("任务单").ResumeRedraw()

DataTables("项目阶段").StopRedraw()
DataTables("项目阶段").RemoveFor("更新时间  = #" & Date.Today & "#")
DataTables("项目阶段").AppendLoad("更新时间  = #" & Date.Today & "#")
DataTables("项目阶段").ResumeRedraw()

DataTables("零件加工").StopRedraw()
DataTables("零件加工").RemoveFor("更新时间  = #" & Date.Today & "#")
DataTables("零件加工").AppendLoad("更新时间  = #" & Date.Today & "#")
DataTables("零件加工").ResumeRedraw()

DataTables("工艺内容").StopRedraw()
DataTables("工艺内容").RemoveFor("更新时间  = #" & Date.Today & "#")
DataTables("工艺内容").AppendLoad("更新时间  = #" & Date.Today & "#")
DataTables("工艺内容").ResumeRedraw()

DataTables("工步").StopRedraw()
DataTables("工步").RemoveFor("更新时间  = #" & Date.Today & "#")
DataTables("工步").AppendLoad("更新时间  = #" & Date.Today & "#")
DataTables("工步").ResumeRedraw()

DataTables("过程记录").StopRedraw()
DataTables("过程记录").RemoveFor("更新时间  = #" & Date.Today & "#")
DataTables("过程记录").AppendLoad("更新时间  = #" & Date.Today & "#")
DataTables("过程记录").ResumeRedraw()

UnLockBaseMainForm()

出现错误提醒


.NET Framework 版本:4.0.30319.1
Foxtable 版本:2022.8.18.1
错误所在事件:
详细错误信息:
Column \'_Identify\' is constrained to be unique.  Value \'29176\' is already present.

--  作者:有点蓝
--  发布时间:2024/7/15 14:46:00
--  
更新时间列有没有时分秒值?
--  作者:1234567
--  发布时间:2024/7/15 14:49:00
--  
没有时分秒,随机出现错误报警。
--  作者:有点蓝
--  发布时间:2024/7/15 14:54:00
--  
改为加载,不要使用追加
DataTables("任务单").StopRedraw()
DataTables("任务单").LoadFilter  = "更新时间  = #" & Date.Today & "#"
DataTables("任务单").Load
DataTables("任务单").ResumeRedraw()