- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 请教代码问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=37126)
-- 发布时间：2013/7/1 9:35:00
-- 请教代码问题
此主题相关图片如下：qq图片20130701093108.jpg
我想将帮助中的"自定义用户管理"登录界面增加用户分组项,如图所示,设计代码如下:
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT 分组 From { Users }"
dt = cmd.ExecuteReader()
Dim cmn As WinForm.ComboBox = e.form.Controls("分组")
cmn.ComboList = DataTables("Users").GetComboListString("分组")
Dim cmb As WinForm.ComboBox = e.Form.Controls("UserName")
cmd.C
cmd.CommandText = "SELECT DISTINCT Name From {Users} Where [分组] = \'" & e.Row("分组") & " "
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
cmb.Items.Add(dr("Name"))
Next
cmb.SelectedIndex = 0
红色为新增加内容,不能正常运行,请教代码如何整改?
-- 发布时间：2013/7/1 9:49:00
--
上个例子看看,代码似乎并没有问题.
-- 发布时间：2013/7/1 10:20:00
--
此主题相关图片如下：111.jpg
显示错误如上,请教是什么问题?
-- 发布时间：2013/7/1 10:24:00
--
你代码是写在哪里的? 窗口的ALterLoad? 那么何来的 e.Row 呢? 你想要获取的是什么?
-- 发布时间：2013/7/1 10:25:00
--
如果是想获取下拉框选择的分组 那么你拼接的应该是 下拉框的值 而不是e.row
-- 发布时间：2013/7/1 16:11:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:用户登录窗口.foxdb |
利用自定义帮助项目和自己的代码制作了上面例子,请指教
-- 发布时间：2013/7/1 17:02:00
--
你代码
写在窗口加载事件里当然没效果
应该写在用户名的 下拉框控件的 ENTER事件里
写在窗口加载事件里当然没效果
应该写在用户名的 下拉框控件的 ENTER事件里