- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 想实现批量授权 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9730)
-- 发布时间：2011/5/5 11:15:00
-- 想实现批量授权
想实现批量授权，授权事件不会写了，谢谢！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目10.rar |
-- 发布时间：2011/5/5 11:45:00
--
何必如此复杂，看我这个，直接在表中输入就行，一样会自动列出用户名、表名、列名：
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:可视化授权.table |
-- 发布时间：2011/5/5 12:06:00
--
他要显得专业一点.
-- 发布时间：2011/5/5 12:15:00
--
呵呵，实用要排在专业前面。
-- 发布时间：2011/5/5 12:17:00
--
你这个整复杂,思路简单一点.
-- 发布时间：2011/5/5 12:33:00
--
我就想实现这点的功能！主要是好多功能能在这里体现！谢谢，帮帮忙
-- 发布时间：2011/5/5 14:46:00
--
你只要做个窗口,将表原封不懂加载到窗口,然后将授权表的项目属性中的代码加入到授权按钮中,不就可以了.或者你做登录窗口指定什么用户名可以加载什么东西?灵活一点.论坛上还有其它关于授权的例子找一下.
-- 发布时间：2011/5/5 14:46:00
--
我现在就是卡在CheckedListBox1里面的列，怎么追加的表格里,因为我用单个的checkerbox1可以实现
-- 发布时间：2011/5/5 17:11:00
--
以下是引用狐狸爸爸在2011-5-2 17:18:00的发言：
论坛找一下有一个差不多的
前面定义字符型的名为C变量存储列名，后面循环也用C变量，这是不行的，这里必须用不同的名称，另外最好判断一下是否选择了表，还有combolist你写成ombolist了。
Dim dt As String = e.Form.Controls("ComboBox2").text \'表名控件
Dim c As String
If dt > "" Then
For Each dc As DataCol In DataTables(dt).DataCols
c = c & "|" & dc.Name
Next
Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox3") \'列名控件
cmb.comboList = c.Trim("|")
End If
| 下载信息 [文件大小：30.0 KB 下载次数：10] | |
 点击浏览该文件:管理项目81.rar |
-- 发布时间：2011/5/5 18:31:00
--
你是不是要在CheckedListBox中列出所有表名和列名?如是看看这个.
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目10.table |