主题：[求助]如何实现按日期条件锁定行？？

谢谢！！！！如何实现按日期条件锁定行？？

 在什么事件里激发？

 代码写在按钮，还是写在哪里，说明白——何时锁定。

谢谢回复！比如今天2012年12月28日,2012年12月28日以前的的所有行，自动锁定。只能编制12月28日以后的行。最好是在全局事件或项目事件里激发。不用按钮。

 写在afteropenproject事件里吧。

for each dt as datatable in datatables
    for each dr as datarow in dt.select("日期 < #" & date.Today & "# And _locked = false")
        dr.locked = true
    next
next

大哥谢谢你！

 

提示：找不到    日期列。

 

是否可以再表属性里添加呢？

 

你要对所有的表进行设置，还是只是对某几张张表这样设置？再有，你的那些数据表都有日期列吗？

就是有几张表。。。。都有日期列

在表里实现的话怎么设置呢？

 

 sql数据源的话，把# 改成 '

dim tbNames() as string = {"表A", "表B", "表C"}

for each name as string in tbNames
    for each dr as datarow in DataTables(name).select("日期 < '" & date.Today & "' And _locked = false")
        dr.locked = true
    next
next

谢谢你。

我新建的项目是可以实现的。但老项目还是不行。。。。以前的项目是用的外部sql源。