Foxtable(狐表)用户栏目专家坐堂 → 请教IL接头跟踪单输出结果问题


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

主题:请教IL接头跟踪单输出结果问题

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


加好友 发短信
等级:七尾狐 帖子:1511 积分:9801 威望:0 精华:0 注册:2014/12/18 16:12:00
  发帖心情 Post By:2021/9/10 10:17:00 [只看该作者]

附页有两个pdf档案,它们从我正式系统里面输出来的结果是有问题的,但是附页的测试项目的输出结果却是没有问题的。不知道原因在哪里。谢谢。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:箱号问题.rar



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


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

提供有问题的实例才能查找问题。

Tables("IL接头任务单").Compute
试试改为
dataTables("IL接头任务单").Compute

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


加好友 发短信
等级:七尾狐 帖子:1511 积分:9801 威望:0 精华:0 注册:2014/12/18 16:12:00
  发帖心情 Post By:2021/9/10 13:00:00 [只看该作者]

改为dataTables("IL接头任务单").Compute 还是存在一样的问题。
现在我在测试项目里发现,对数据行进行过筛选就会出现问题。如果不对数据行进行筛选,就没有问题。那是什么原因呢?

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


加好友 发短信
等级:超级版主 帖子:107846 积分:548581 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/10 13:38:00 [只看该作者]

筛选就是Table的问题。把代码里所有的Tables("IL接头任务单").Compute这种用法全部都改为dataTables("IL接头任务单").Compute

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


加好友 发短信
等级:七尾狐 帖子:1511 积分:9801 威望:0 精华:0 注册:2014/12/18 16:12:00
  发帖心情 Post By:2021/9/10 14:42:00 [只看该作者]

改为 dataTables("IL接头任务单").Compute 没效果。

在测试项目里,哪怕改为 dataTables("IL接头任务单").Compute, 对数据行进行过筛选后一样会出现问题。

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


加好友 发短信
等级:超级版主 帖子:107846 积分:548581 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/10 14:54:00 [只看该作者]

如果是根据筛选结果处理,所有查询条件都加上筛选条件。
有些地方加了

 '-----开始填入物料清单

                Dim filter As String = Tables("IL接头任务单").filter

                If filter > "" Then  filter = filter  & " and "

 

                '填入物料编号

                Dim Products As List(Of String) = DataTables("IL接头任务单").GetValues("产品型号与回路号",filter & " SO号与箱号 ='" & ctn(s-1) & "' ", "侧盖板组件") '按侧盖板组件进行排序


但是有些地方没有加
dr90 = DataTables("IL接头任务单").find("SO号与箱号 ='" & ctn(s-1) & "' and 产品型号与回路号='" & sss & "' ")

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


加好友 发短信
等级:七尾狐 帖子:1511 积分:9801 威望:0 精华:0 注册:2014/12/18 16:12:00
  发帖心情 Post By:2021/9/10 17:39:00 [只看该作者]

dr90 = DataTables("IL接头任务单").find("SO号与箱号 ='" & ctn(s-1) & "' and 产品型号与回路号='" & sss & "' ")
像这句要怎么加? 

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


加好友 发短信
等级:超级版主 帖子:107846 积分:548581 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/10 17:44:00 [只看该作者]

和这里的用法一样

                Dim filter As String = Tables("IL接头任务单").filter

                If filter > "" Then  filter = filter  & " and "

 

                '填入物料编号

                Dim Products As List(Of String) = DataTables("IL接头任务单").GetValues("产品型号与回路号",filter & " SO号与箱号 ='" & ctn(s-1) & "' ", "侧盖板组件") '按侧盖板组件进行排序


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


加好友 发短信
等级:七尾狐 帖子:1511 积分:9801 威望:0 精华:0 注册:2014/12/18 16:12:00
  发帖心情 Post By:2021/9/11 8:12:00 [只看该作者]

我作了改动,但是输出结果还是有问题:虽然不是空行了,它还是把别的标签内容也输出了(数量为0)。
请看我测试项目里面的修改。谢谢。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:箱号问题.rar



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


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

说明查询条件还是有问题,学会调试,把代码复制到命令窗口执行,加上调试代码,输出每个查询条件查看,类似

 Dim filter As String = Tables("IL接头任务单").filter

                If filter > "" Then  filter = filter  & " and "

 output.show(filter & " SO号与箱号 ='" & ctn(s-1) & "' ")

                '填入物料编号

                Dim Products As List(Of String) = DataTables("IL接头任务单").GetValues("产品型号与回路号",filter & " SO号与箱号 ='" & ctn(s-1) & "' ", "侧盖板组件") '按侧盖板组件进行排序


 回到顶部
总数 56 上一页 1 2 3 4 5 6 下一页