Foxtable(狐表)用户栏目专家坐堂 → 如何根据用户名显示其分组?


  共有3657人关注过本帖树形打印复制链接

主题:如何根据用户名显示其分组?

帅哥哟,离线,有人找我吗?
lin98
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1360 积分:9034 威望:0 精华:0 注册:2020/11/4 22:15:00
如何根据用户名显示其分组?  发帖心情 Post By:2023/6/30 14:23:00 [只看该作者]

Dim cmd As New SQLCommand
Dim dt As DataTable
Dim cmb As WinForm.ComboBox = e.Form.Controls("UserName")

cmd.C '
cmd.CommandText = "SELEC-T DISTINCT Name  From {Users}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
   cmb.Items.Add(dr("Name"))
Next
cmb.SelectedIndex = 0

上面代码无法实现,根据用户名,显示其分组?如何解决?



图片点击可在新窗口打开查看此主题相关图片如下:用户登录.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110810 积分:563988 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/6/30 14:37:00 [只看该作者]

用户名UserName控件valuechanged事件

Dim cmd As New SQLCommand

cmd.C '
cmd.CommandText = "SELECT 部门  From {Users} where name='" & e.sender.text & "'"
e.Form.Controls("部门输入框").text = cmd.ExecuteScalar()

 回到顶部