Foxtable(狐表)用户栏目专家坐堂 → [求助]like的通配符


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

主题:[求助]like的通配符

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


加好友 发短信
等级:童狐 帖子:201 积分:2085 威望:0 精华:0 注册:2018/5/4 14:45:00
[求助]like的通配符  发帖心情 Post By:2019/2/16 13:54:00 [显示全部帖子]

老师:你好!
我有以下程序段:            
1:          Dim xt As String=Tables(_Sys_lsb2+"_Table1").Current("项目角色")
2:           cmd.CommandText = "S elect [姓名] FROM {xtb_Users} w here [项目角色] like '%"& xt &"%'"
3:           Dim Values = cmd.ExcuteValues
运行结果不对,不知是啥原因请指正!谢谢!!

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


加好友 发短信
等级:童狐 帖子:201 积分:2085 威望:0 精华:0 注册:2018/5/4 14:45:00
  发帖心情 Post By:2019/2/16 16:20:00 [显示全部帖子]

cmd.C
If e.IsFocusCell Then '如果是焦点单元格
    If e.Col.Name = "姓名" Then '如果正在编辑的是"姓名"列
        If _XM_Ro="项目负责人" Then
            Dim xt As String=Tables(_Sys_lsb2+"_Table1").Current("项目角色")
            cmd.CommandText = "S elect [姓名] FROM {xtb_Users} w here [项目角色] like '%"& xt &"%'"
            Dim Values = cmd.ExcuteValues
            If values.count > 0 Then
                xt1=Values("姓名")
                DataTables(_Sys_lsb2+"_Table1").DataCols("姓名").ExtendType = ExtendTypeEnum.None
                Tables(_Sys_lsb2+"_Table1").Cols("姓名").ComboList = xt1
            End If
      End If
  End If
End If

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


加好友 发短信
等级:童狐 帖子:201 积分:2085 威望:0 精华:0 注册:2018/5/4 14:45:00
  发帖心情 Post By:2019/2/16 16:29:00 [显示全部帖子]

msgbox(cmd.CommandText)
运行结果:
S elect [姓名] FROM {xtb_Users} w here [项目角色] like '%项目经理%'
感觉没问题,但查询结果只出来数据库中最前面的一个人

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


加好友 发短信
等级:童狐 帖子:201 积分:2085 威望:0 精华:0 注册:2018/5/4 14:45:00
  发帖心情 Post By:2019/2/16 17:56:00 [显示全部帖子]

好,解决了,谢谢老师!

 回到顶部