Foxtable(狐表)用户栏目专家坐堂 → 登陆窗口


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

主题:登陆窗口

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


加好友 发短信
等级:幼狐 帖子:195 积分:1395 威望:0 精华:0 注册:2014/1/21 9:45:00
登陆窗口  发帖心情 Post By:2014/12/17 10:49:00 [显示全部帖子]

Dim cmd As New SQLCommand
Dim dt As DataTable
Dim cmb As WinForm.ComboBox = e.Form.Controls("UserName")
cmd.C
cmd.CommandText = "SELECT DISTINCT Name From {Users}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
   cmb.Items.Add(dr("Name"))
Next
cmb.SelectedIndex = 0

怎么插入一个条件判断  该员工是否为账套操作员    users表中有一列名为  账套操作员的逻辑了

 


 回到顶部
帅哥哟,离线,有人找我吗?
120785713
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:195 积分:1395 威望:0 精华:0 注册:2014/1/21 9:45:00
  发帖心情 Post By:2014/12/17 10:54:00 [显示全部帖子]

以下是引用有点甜在2014-12-17 10:53:00的发言:

这个意思?

 

cmd.CommandText = "SELECT DISTINCT Name From {Users} Where 是否操作员 = True"

是的   谢谢甜老师

 

 

为什么会提示:

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2014.11.11.1
错误所在事件:
详细错误信息:
列名 'True' 无效。

[此贴子已经被作者于2014-12-17 10:58:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
120785713
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:195 积分:1395 威望:0 精华:0 注册:2014/1/21 9:45:00
  发帖心情 Post By:2014/12/17 11:02:00 [显示全部帖子]

是的  你的意思是可以直接  属性里定义列项目  

然后通过筛选  是否操作员 = True

这样会影响登陆吗


 回到顶部
帅哥哟,离线,有人找我吗?
120785713
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:195 积分:1395 威望:0 精华:0 注册:2014/1/21 9:45:00
  发帖心情 Post By:2014/12/17 11:10:00 [显示全部帖子]

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2014.11.11.1
错误所在事件:窗口,用户登陆,AfterLoad
详细错误信息:
InvalidArgument=“0”的值对于“index”无效。
参数名: index

 

 

还是不对 


 回到顶部
帅哥哟,离线,有人找我吗?
120785713
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:195 积分:1395 威望:0 精华:0 注册:2014/1/21 9:45:00
  发帖心情 Post By:2014/12/17 11:12:00 [显示全部帖子]

下拉选项中不是操作员就不加载名字了  


 回到顶部
帅哥哟,离线,有人找我吗?
120785713
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:195 积分:1395 威望:0 精华:0 注册:2014/1/21 9:45:00
  发帖心情 Post By:2014/12/17 11:31:00 [显示全部帖子]

dr = dt.DataRows(0)
If e.Form.Controls("PassWord").Value = dr("Password") Then
    _UserName = UserName
    dr("zhangtaocaozuoyuan") = True
    _UserGroup = dr("Group")

确定的代码已经搞了

就是这个登陆员工姓名不知道该怎么改  呵呵


 回到顶部