每天启动的时候，要实现根据列（深化设计完成时间节点_扩初图会签时间）的日期和系统日期（Date.Today）比较后，再执行上楼下面的代码，求助？DataTables("室内设计项目").DataCols("深化设计完成时间节点_扩初图会签时间").RaiseDataColChanged() 怎样增加一个每天启动自动和系统日期比较执行代码呢？
Dim dt As DataTable = DataTables("室内设计项目")
Dim
stra = DataTables("室内设计项目").GetComboListString("深化设计完成时间节点_负责人",
"(深化设计完成时间节点_扩初图会签时间>#" & Date.Today & "# or
深化设计完成时间节点_扩初图会签时间 is null)")
msgbox(stra)
stra = stra.replace(",", "|").replace("|", "','")
Tables("员工资料").filter = "姓名 not in ('" & stra & "')"
DataTables("员工资料").replacefor("个人状态", "我有空", "姓名 not in ('" & stra & "')")
[此贴子已经被作者于2018/12/2 23:24:49编辑过]
加好友 
发短信
Post By：2018/12/2 23:19:00 [只看该作者]
