Foxtable(狐表)用户栏目专家坐堂 → 关于orelse组合表达式的问题,请老师看一下!


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

主题:关于orelse组合表达式的问题,请老师看一下!

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


加好友 发短信
等级:一尾狐 帖子:401 积分:4138 威望:0 精华:0 注册:2017/3/24 15:10:00
关于orelse组合表达式的问题,请老师看一下!  发帖心情 Post By:2018/1/3 20:08:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180103194820.png
图片点击可在新窗口打开查看
有图为证,请老师看一下代码:
If _usergroup.Contains("管理员组") Then
    ssfx.ComboList="总校|" &  DataTables("分校").SQLGetComboListString("分校名称")
    fxlb.ComboList= DataTables("分校").SQLGetComboListString("分校名称")
    jztj=""
ElseIf _usergroup.Contains("权益组")
    Dim Multi As String = DataTables("职员表").SQLFind("工号='" & _userzhanghao & "'")("所属校区")
    MessageBox.show(multi)
    Dim Values() As String
    Values = Multi.split("|")
    For i As Integer = 0 To Values.Length - 1
        If i > 0 Then
            MessageBox.show("1")
            jztj = jztj & " OrElse "
        End If
        jztj = jztj & "所属校区 Like ' % " & Values(i) & " % '"
    Next
    MessageBox.show(jztj)
    Dim dr As DataRow
    dr=DataTables("职员表").SQLFind("工号='" & _username & "'")
    If dr IsNot Nothing Then '如果找到的话
        fxlb.ComboList=dr("所属校区")
        ssfx.ComboList=dr("所属校区")
    End If
Else
    MessageBox.show("您无此管理权限!","提示")
    Return
End If

DataTables("职员表").LoadFilter=jztj
DataTables("职员表").Load

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180103194758.png
图片点击可在新窗口打开查看

Tables(e.form.name & "_职员列表").AutoSizeCols
Tables(e.form.name & "_职员列表").Cols.Frozen=2

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/1/3 20:17:00 [只看该作者]

jztj = jztj & " OrElse "

 

改成

 

jztj = jztj & " Or "


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


加好友 发短信
等级:一尾狐 帖子:401 积分:4138 威望:0 精华:0 注册:2017/3/24 15:10:00
  发帖心情 Post By:2018/1/3 21:02:00 [只看该作者]

老师错误提示解决了,但还是加载不成功,你看看生成的代码是否正确?
DataTables("职员表").LoadFilter=jztj
jztj生成的就是:所属校区 Like ' % 泰安道朗 % ' Or 所属校区 Like ' % 长清银丰 % ' Or 所属校区 Like ' % 长清万德 % ' Or 所属校区 Like ' % 长清界首 % '

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


加好友 发短信
等级:一尾狐 帖子:401 积分:4138 威望:0 精华:0 注册:2017/3/24 15:10:00
  发帖心情 Post By:2018/1/3 21:11:00 [只看该作者]

这个是datatable表,请老师帮一下,困扰多时了!
图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/1/3 22:53:00 [只看该作者]

jztj = jztj & "所属校区 Like ' % " & Values(i) & " % '"

 

改成

 

jztj = jztj & "所属校区 Like '%" & Values(i) & "%'"


 回到顶部