Foxtable(狐表)用户栏目专家坐堂 → 数据导入


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

主题:数据导入

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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
数据导入  发帖心情 Post By:2018/1/23 13:16:00 [显示全部帖子]


此主题相关图片如下:112.png
按此在新窗口浏览图片
 

 

我要在上图的订单明细表中,当欠货数量=0,就不要显示了,写了下面的代码,出错了

AfterLoad代码

DataTables("供应商订货总表").loadfilter = "核销 = false and 供应商名称 = '" & Tables("供应商回货总表").Current("供应商名称") & "'"

DataTables("供应商订货总表").load

 

If Tables("供应商订货总表").Current IsNot Nothing Then

Dim r As Integer

    r= DataTables("客户订货明细表").Current("(欠货数量)","订货单号 = '" & Tables("客户订货总表").Current("订货单号") & "'")

    DataTables("供应商订货明细表").loadfilter = " r > 0  And 供应商名称 = '" & Tables("供应商订货总表").Current("供应商名称") & "'"

    DataTables("供应商订货明细表").load

Else

    DataTables("供应商订货明细表").loadfilter = "供货商名称 Is null"

    DataTables("供应商订货明细表").load

End If


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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
  发帖心情 Post By:2018/1/23 15:42:00 [显示全部帖子]

 DataTables("供应商订货明细表").loadfilter = "欠货数量 > 0 and 供应商名称 = '" & Tables("供应商订货总表").Current("供应商名称") & "'"
老师,还是显示不对,我之前就这样试过的

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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
  发帖心情 Post By:2018/1/23 15:55:00 [显示全部帖子]

打开之后就不对

If Tables("供应商订货总表").Current IsNot Nothing Then
    DataTables("供应商订货明细表").loadfilter="订货单号='" & Tables("供应商订货总表").Current("订货单号") & "'"
    DataTables("供应商订货明细表").load
End If


 回到顶部