以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 行锁定状态问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96068)
--  作者：紫色幽魂
--  发布时间：2017/2/12 13:39:00
--  [求助] 行锁定状态问题
请问要根据日期列的日期值来计算，低于多少天后自动锁定行，需要写在哪个事件
--  作者：wyz20130512
--  发布时间：2017/2/12 15:08:00
--  
DataColChanged事件
--  作者：紫色幽魂
--  发布时间：2017/2/12 15:09:00
--  回复：（wyz20130512）DataColChanged事件
好的，谢谢
--  作者：紫色幽魂
--  发布时间：2017/2/12 15:29:00
--  
If e.DataRow("首次检测_检测时间") < Date.Today.AddDays(-30) Then
    e.DataRow.Locked = True
End If
这样写代码好像不对，应该怎么写呢
--  作者：有点色
--  发布时间：2017/2/12 16:34:00
--  

afterOpenProject事件

 

For Each dr As DataRow In DataTables("表A").Select("")
    If dr("首次检测_检测时间") < Date.Today.AddDays(-30) Then
        dr.Locked = True
    End If
Next
--  作者：紫色幽魂
--  发布时间：2017/2/13 13:36:00
--  回复：（有点色）afterOpenProject事件 For ...
谢谢