以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  跨表记录  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104963)

--  作者:zoudezhao
--  发布时间:2017/8/9 11:15:00
--  跨表记录
如果我想设置一个条件,订单表的产品列是A产品,签收情况列是已签收时,可以自动给表A中对应客户的签收状况列中自动修改为已签收应该怎么做。。用的sql2008的数据库,而且客户数据未加载。
--  作者:有点甜
--  发布时间:2017/8/9 14:03:00
--  

可以用sqlFind查找后台值 http://www.foxtable.com/webhelp/scr/2911.htm

 


--  作者:zoudezhao
--  发布时间:2017/8/9 15:17:00
--  
甜老师有个问题是,表A没有可以查找的值。。因为已签收是在订单表显示的,我想让这个已签收能在表A中看到。。
--  作者:有点甜
--  发布时间:2017/8/9 16:23:00
--  
以下是引用zoudezhao在2017/8/9 15:17:00的发言:
甜老师有个问题是,表A没有可以查找的值。。因为已签收是在订单表显示的,我想让这个已签收能在表A中看到。。

 

根据什么查找和显示?

 

不理解你的问题,截图或例子说明。


--  作者:zoudezhao
--  发布时间:2017/8/9 19:17:00
--  
当我订单表的产品列=Mp3,订单状态=已签收,满足这两个条件时会根据这一个客户的编号,给客户表中的MP3是否签收列填入是
--  作者:zoudezhao
--  发布时间:2017/8/9 19:23:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

就是这样的,只有MP3签收的我想在客户表里的Mp3是否签收列显示是

--  作者:有点甜
--  发布时间:2017/8/9 19:31:00
--  

DataColChanged事件

 

Select Case e.DataCol.name
    Case "客户编号","产品","订单状态"
        Dim fdr As DataRow = DataTables("客户表").find("客户编号 = \'" & e.DataRow("客户编号") & "\'")
        If fdr IsNot Nothing Then
            If e.DataRow("产品") = "mp3" Then
                If e.DataRow("订单状态") = "已签收"
                    fdr("MP3是否签收") = "是"
                Else
                    fdr("MP3是否签收") = Nothing
                End If
            End If
        End If
End Select


--  作者:zoudezhao
--  发布时间:2017/8/9 19:52:00
--  
甜老师那如果是用的SQL数据库,而且客户表中未加载该客户数据怎么办。。
--  作者:有点甜
--  发布时间:2017/8/9 21:35:00
--  

Select Case e.DataCol.name
    Case "客户编号","产品","订单状态"
        Dim fdr As DataRow = DataTables("客户表").sqlfind("客户编号 = \'" & e.DataRow("客户编号") & "\'")
        If fdr IsNot Nothing Then
            If e.DataRow("产品") = "mp3" Then
                If e.DataRow("订单状态") = "已签收"
                    fdr("MP3是否签收") = "是"
                Else
                    fdr("MP3是否签收") = Nothing
                End If
            End If

            fdr.save
        End If
End Select


--  作者:zoudezhao
--  发布时间:2017/8/10 9:57:00
--  

甜老师sqlfind我测试过了不好用。。。而且加上sqlfind连表中已存在的也无法修改了