Foxtable(狐表)用户栏目专家坐堂 → 引用结果异常


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

主题:引用结果异常

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


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

代码没问题,请加入msgbox弹出各个值,看是否正确。

 

如果数据也不正确,说明你数据库数据有问题。


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


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

以下是引用nuoyan88在2018/1/23 9:56:00的发言:
老师,图片1图片2是我的查询结果,图3是显示结果

 

没问题啊。成品编码、加工工序 得到的数据有那么多行,随便取哪一行都正确啊。

 

在多行数据里面,你要取哪一行数据?逻辑是什么?


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


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

以下是引用有点甜在2018/1/23 10:03:00的发言:

 

没问题啊。成品编码、加工工序 得到的数据有那么多行,随便取哪一行都正确啊。

 

在多行数据里面,你要取哪一行数据?逻辑是什么?


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


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

那你条件就这样写

 

filter = "成品编码= '" & dr("成品编码") & "' And 加工工序 = '" & dr("加工工序") & "' and  生产批次号 = '" & dr("生产批次号") & "'"


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


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

Select Case e.DataCol.Name
    Case "成品编码","加工工序","生产批次"
        Dim dr As DataRow = e.DataRow
        Dim pr As DataRow
        If dr.IsNull("成品编码") OrElse dr.IsNull("加工工序")Then
            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

 回到顶部