以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  锁定行的代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17006)
--  作者：moshazhan
--  发布时间：2012/3/1 0:45:00
--  锁定行的代码
帮写锁定日期小于当天日期行的代码
--  作者：狐狸爸爸
--  发布时间：2012/3/1 7:47:00
--  

for each dr as datarow in datatables("xxx")

    if dr("日期列名称") < Date.Today Then

       dr.Locked = True

    end if

next
--  作者：moshazhan
--  发布时间：2012/3/1 12:08:00
--  

谢谢！
--  作者：manyifuwu
--  发布时间：2012/12/29 11:24:00
--  

这个代码  是放在哪呢？

 
--  作者：lin_hailun
--  发布时间：2012/12/29 11:30:00
--  
 放在afteropenproject里。