- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 自定义用户登录问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=10886)
-- 发布时间：2011/6/28 13:22:00
-- 自定义用户登录问题
参考示例，做了个自定义用户登录窗口，增加了个用户组选择，因不熟悉SQL,不知道如何根据所选的用户组，在用户栏只显示该组的用户，请大侠帮忙。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.rar |
[此贴子已经被作者于2011-6-29 16:31:25编辑过]
-- 发布时间：2011/6/28 13:36:00
--
加个条件 用户组=\'什么\'
-- 发布时间：2011/6/28 14:03:00
--
自定义用户管理的最后一部分讲的就是这个：
http://help.foxtable.com/topics/2048.htm
-- 发布时间：2011/6/28 16:32:00
-- 如何在主窗口中隐藏表B和表C
应加在什么地方，我把例子传上来，帮忙看看。
-- 发布时间：2011/6/28 16:33:00
-- 如何在主窗口中隐藏表B和表C
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.table |
-- 发布时间：2011/6/28 16:36:00
-- 如何在主窗口中隐藏表B和表C
用户.mdb 无法上传
-- 发布时间：2011/6/29 16:34:00
-- 如何在主窗口中隐藏表B和表C
已经将做的内容传上来了，请看看为什么在选择用户组后，用户不会根据所选内容调整。
-- 发布时间：2011/6/29 16:48:00
--
以下是引用倪惠明在2011-6-28 16:36:00的发言：
用户.mdb 无法上传
用户.mdb 无法上传
压缩上传。
-- 发布时间：2011/6/29 17:16:00
-- 如何在主窗口中隐藏表B和表C
已经在一楼压缩上传了，请狐狸爸爸帮忙看看。谢谢！
-- 发布时间：2011/6/29 18:11:00
--
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim cmb As WinForm.ComboBox = e.Form.Controls("UserName")
Dim gr As String = e.Form.Controls("UserGroup").value
cmd.C
cmd.CommandText = "SELECT Name From {Users} Where [Group] = \'"& gr &"\'"
dt = cmd.ExecuteReader()
cmb.Items.Clear()
For Each dr As DataRow In dt.Datarows
cmb.Items.Add(dr("Name"))
Next
cmb.SelectedIndex = 0