If e.DataTableName = "工作任务表" if e.User.Name = "开发者" or e.User.Name = "袁总" or e.User.Name = "宋经理" or e.User.Name = "陈总" or e.User.Name = "steve" or e.User.Name = "管理员" Then e.Filter = "[负责工程师] In ('聂宗财','罗顺龙','刘喜明','郭泽燕')" else e.Filter = "[负责工程师] = '" & e.User.Name & "'" End If End If
加好友 
发短信
Post By：2009/4/25 12:39:00 [显示全部帖子]
