以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]请问“自定义用户与权限管理”能否增加一列用户编号? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=154482) |
|
-- 作者:明天的灵 -- 发布时间:2020/9/16 8:52:00 -- [求助]请问“自定义用户与权限管理”能否增加一列用户编号?
|
|
-- 作者:明天的灵 -- 发布时间:2020/9/16 9:12:00 -- Dim cmd As New SQLCommand Dim dt As DataTable Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1") cmd.C cmd.CommandText = "SEL ECT DISTINCT Name,PassWord From {Users}" dt = cmd.ExecuteReader() For Each dr As DataRow In dt.Datarows lst.Items.Add(dr("编号") & "|" & (dr("Name")) Next If Lst.Items.Count > 0 Then lst.SelectedIndex = 0 End If 我把用户管理窗口的AfterLoad改了下,编号与用户名之间用|分隔,觉得不美观,能否把这个窗口的ListBox改为副表来显示用户编号与用户名?
|
|
-- 作者:有点蓝 -- 发布时间:2020/9/16 9:32:00 -- 这种用户表和代码都是自己设计的,想怎么改就怎么改 |
|
-- 作者:明天的灵 -- 发布时间:2020/9/16 9:34:00 -- 假如用表控件来显示用户列表,表类型为:SQLQuery型,SEL ECT语句:Table,SEL ECT DISTINCT 编号,Name From {Users} 则在增加用户与删除用户后,没有及时更新用户列表内容。 |
|
-- 作者:有点蓝 -- 发布时间:2020/9/16 9:41:00 -- 重新加载数据:datatables("某SQLQuery").load |
|
-- 作者:明天的灵 -- 发布时间:2020/9/16 11:32:00 -- 蓝版主:关于5楼问题,这个SQLQuery型表是用户管理窗口的表控件Table1,如何实现重新加载5楼这个数据表。 |
|
-- 作者:有点蓝 -- 发布时间:2020/9/16 11:40:00 -- datatables("某窗口_Table1").load |
|
-- 作者:明天的灵 -- 发布时间:2020/9/16 12:56:00 -- 谢谢蓝版主,改7楼写法就可以了 |