Foxtable(狐表)用户栏目专家坐堂 → [求助]


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

主题:[求助]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/22 21:28:00 [显示全部帖子]

 If User.IsRole("对公专区") Then
    '审核代码
    Dim idxs As String = "-1,"
    For Each dr As DataRow In DataTables("对公客户明细").Select("已开通业务 is not null And [年日均余额]>=50000")
        If dr("已开通业务").split(",").length >= 4 Then
            idxs &= dr("_Identify") & ","
        End If
    Next
    Tables("对公客户明细").Filter = "_Identify in (" & idxs.Trim(",") & ")"
Else
    MessageBox.Show("您无此权限!")
End If

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/22 21:44:00 [显示全部帖子]

 那就是你的代码逻辑不对,或者没有对应的数据。

 例子上传上来

 回到顶部