Foxtable(狐表)用户栏目专家坐堂 → 结果不显示,也没有任何提示


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

主题:结果不显示,也没有任何提示

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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
  发帖心情 Post By:2018/12/11 22:17:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:超级版主 帖子:106320 积分:540735 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/11 22:22:00 [只看该作者]

Select Case e.DataCol.Name
    Case "中康编码","成品编码","业务员"
        Dim dr As DataRow = e.DataRow
        Dim pr As DataRow
        If dr.IsNull("中康编码") OrElse dr.IsNull("成品编码") OrElse dr.IsNull("业务员") Then
            dr("单价美金_不含税") = Nothing
            dr("单价美金_含税") = Nothing
            dr("税点") = Nothing
         Else
            Dim filter As String
            filter = "中康编码= '" & dr("中康编码") & "' And 成品编码 = '" & dr("成品编码") & "' and 业务员 = '" & dr("业务员") & "'"
            pr = DataTables("销售报价").SQLFind(filter)
            If pr IsNot Nothing Then
                dr("单价美金_不含税") = pr("单价美金_不含税")
                dr("单价美金_含税") = pr("单价美金_含税")
            End If
        End If
End Select

 回到顶部
总数 12 上一页 1 2