专家坐堂-动态加载关联表的问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  动态加载关联表的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3814)

--  作者：woodiy
--  发布时间：2009/8/5 11:24:00
--  动态加载关联表的问题

此主题相关图片如下：qq截图未命名.jpg

我的销售出库单与出库明细是相关联的。销售出库单用动态加载，怎么才能把出库明细也能动态加载进来。谢谢！

--  作者：yangming
--  发布时间：2009/8/5 11:39:00
--

先计算关联列,然后再加载

--  作者：czy
--  发布时间：2009/8/5 11:45:00
--

以下是引用woodiy在2009-8-5 11:24:00的发言：

此主题相关图片如下：qq截图未命名.jpg

我的销售出库单与出库明细是相关联的。销售出库单用动态加载，怎么才能把出库明细也能动态加载进来。谢谢！

怎么动态加载销售出库单就怎么动态加载出库明细，所不同的只是表名。

--  作者：woodiy
--  发布时间：2009/8/5 11:57:00
--
动态加载销售出库单的代码
NodeMouseDoubleClick

用鼠标双击节点后执行。

Dim Value()As String
Dim Filter As string
Value = e.Node.FullPath.Split("\\")
Select Case e.Node.Level
    Case 0
        Filter ="[省市] = \'" & Value(0) & "\'"
    Case 1
        Filter ="[省市] = \'" & Value(0) & "\' And [客户名称] = \'" & Value(1) & "\'"
End Select
DataTables("出库主表").LoadFilter = Filter
DataTables("出库主表").Load()

--  作者：yangming
--  发布时间：2009/8/5 12:22:00
--

以下是引用woodiy在2009-8-5 11:57:00的发言：
动态加载销售出库单的代码
NodeMouseDoubleClick

用鼠标双击节点后执行。

Dim Value()As String
Dim Filter As string
Value = e.Node.FullPath.Split("\\")
Select Case e.Node.Level
    Case 0
        Filter ="[省市] = \'" & Value(0) & "\'"
    Case 1
        Filter ="[省市] = \'" & Value(0) & "\' And [客户名称] = \'" & Value(1) & "\'"
End Select
DataTables("出库主表").LoadFilter = Filter
DataTables("出库主表").Load()

不行吗?

--  作者：woodiy
--  发布时间：2009/8/5 12:37:00
--

上面的代码可以，就是如何再动态加载出库明细

--  作者：yangming
--  发布时间：2009/8/5 12:44:00
--
你是想用同一个目录树动态加载二个表?

--  作者：梦倩
--  发布时间：2009/8/5 12:48:00
--

[此贴子已经被作者于2009-8-5 12:48:41编辑过]

--  作者：woodiy
--  发布时间：2009/8/5 12:53:00
--

以下是引用yangming在2009-8-5 12:44:00的发言：
你是想用同一个目录树动态加载二个表?

是的。应该是这样的吧

--  作者：yangming
--  发布时间：2009/8/5 13:02:00
--  [原创]如何在扩展列类型中选加入图片的同时也同时读入数码图片的Exif信息表?

以下是引用woodiy在2009-8-5 12:53:00的发言：

是的。应该是这样的吧

那可能就要用全局变量做个开关了,当开关=True时加载一个表,反之加载另一个表