以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]请教关于限制新增表数据的方法 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78473) |
-- 作者:我来看看 -- 发布时间:2015/12/9 18:45:00 -- [求助]请教关于限制新增表数据的方法 我想实现这个功能:
1、表A的数据,用户只能新增三日以内的,比如今天12月9日,点击增加按钮后只能在数据表中增加7-9日的内容,想补充增加7日以前的数据是不能增加的,请问如何实现??
2、表A的数据在每个月的月底日(30或31日)系统自动锁定之前的表数据,用户不能再编辑、删除相关数据(只有管理员可以),请问如何实现??? [此贴子已经被作者于2015/12/9 18:46:13编辑过]
|
-- 作者:大红袍 -- 发布时间:2015/12/9 19:25:00 -- datacolchanging事件
If e.DataCol.Name = "日期" AndAlso e.NewValue <> Nothing Then If e.NewValue < Date.Today.AddDays(-3) Then e.Cancel = True End If End If |
-- 作者:大红袍 -- 发布时间:2015/12/9 19:28:00 -- AfterOpenProject事件
Datatables("表A").ReplaceFor("_Locked", true, "日期 < #" & new date(date.Now.Year, date.Now.Month, 1) & "#")
要想编辑,就运行代码解锁当前行
Tables("表A").Current.Locked = False |
-- 作者:我来看看 -- 发布时间:2015/12/9 19:28:00 -- 谢谢老师,我试一下,第二个功能能实现吗 |