- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 角色列单元格内容定义成权限列单元格内容，有图请教 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=53133)
-- 发布时间：2014/6/30 14:19:00
-- 角色列单元格内容定义成权限列单元格内容，有图请教
角色列单元格内容定义成权限列单元格内容，有图请教？？
同一个表，有两列，一个角色列，另一个权限列，权限列已经绑定另一表的角色权限列中各选项，请帮帮我，代码怎么定
此主题相关图片如下：qq图片20140630141530.jpg
这样写代码可以吗？
Dim dr As DataRow
dr = DataTables("xxx").find("角色=\'" & 角色的变量 & "\' And 录入 = true")
If dr Is Nothing Then
msgbox("你们有权限可以录入")
Else
Tables("xxx").addnew
End If
[此贴子已经被作者于2014-6-30 14:44:36编辑过]
-- 发布时间：2014/6/30 15:59:00
--
这个意思？
Dim dr As DataRow
dr = DataTables("xxx").find("角色=\'" & 角色的变量 & "\' And 权限 Like \'*可录入*\'")
If dr Is Nothing Then
msgbox("你们有权限可以录入")
Else
Tables("xxx").addnew
End If