- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]判断并记录时间 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=72007)
-- 发布时间：2015/7/22 9:26:00
-- [求助]判断并记录时间
If e.Col.Name = "合同回寄日期" Then \'记录合同回寄日期
If e.Row("合同回寄与否") = True Then
e.Row("合同回寄日期") = Date.Today
End If
End If
如果逻辑列"合同回寄日期"是true,则"合同回寄日期"自动填充当天时间。上述程序怎么不对呢？
-- 发布时间：2015/7/22 9:33:00
--
If e.Col.Name = "合同回寄与否" Then \'记录合同回寄日期
If e.Row("合同回寄与否") = True Then
e.Row("合同回寄日期") = Date.Today
End If
End If
-- 发布时间：2015/7/22 9:34:00
--
什么意思？
-- 发布时间：2015/7/22 9:35:00
--
刷新看2楼
-- 发布时间：2015/7/22 9:41:00
--
此主题相关图片如下：catch.jpg
我在表属性 datacolchanged 里面用成程序怎么提示如图呢？难道不应该放这里？
-- 发布时间：2015/7/22 9:44:00
--
If e.DataCol.Name = "合同回寄与否" Then \'记录合同回寄日期
If e.DataRow("合同回寄与否") = True Then
e.DataRow("合同回寄日期") = Date.Today
End If
End If
-- 发布时间：2015/7/22 10:21:00
--
If e.DataCol.Name = "合同回寄与否" Then \'记录合同回寄日期
If e.DataRow("合同回寄与否") = True Then
e.DataRow("合同回寄日期") = Date.Today
If e.DataRow("合同回寄与否") = False Then
e.DataRow("合同回寄日期").isnull("合同回寄日期") = Nothing
End If
End If
End If
程序加句("合同回寄与否") = False，则("合同回寄日期")为空。
-- 发布时间：2015/7/22 10:22:00
--
If e.DataCol.Name = "合同回寄与否" Then \'记录合同回寄日期
If e.DataRow("合同回寄与否") = True Then
e.DataCol("合同回寄日期") = Date.Today
Else
e.DataCol("合同回寄日期") = Nothing
End If
End If