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.
改为加载,不要使用追加
DataTables("任务单").StopRedraw()
DataTables("任务单").LoadFilter = "更新时间 = #" & Date.Today & "#"
DataTables("任务单").Load
DataTables("任务单").ResumeRedraw()