以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  调用外部数据表时候应该怎么办  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=55450)

--  作者:jinzhengbe
--  发布时间:2014/8/17 5:51:00
--  调用外部数据表时候应该怎么办
我有两个 外部数据表 

表 a  和 表  b

表 b 的 mm行 默认是空的。

所以我想在打开项目加载数据的时候判断 mm行是否为空 

if mm是空的
就在表a 中 cc列中 查找 和 表b的  aa列的值 一样的值 来填充 mm类。 

这个情况应该 写在哪个事件? 直接用下面的代码可以不? 非常感谢

If e.DataRow("业务员") Then

  Dim dr As DataRow 

    dr = DataTables("商品").Find("id = " & "\'" & e.DataRow("productid") & "\'" )

    If dr IsNot Nothing \'如果找到, 则设置各列内容

        e.DataRow("商品名")= dr("cn_name")

 Else

  \' e.DataRow("应取数量")= 系统录入值(这个地方该怎么写)       

End If

  End If


--  作者:有点甜
--  发布时间:2014/8/17 9:17:00
--  

 无语,要帮你写多少次你才明白?

 

 代码写到AfterOpenProject事件去

 

For Each dr As DataRow In DataTables("订单").Select("业务员 is null") 
    Dim fdr As DataRow = DataTables("商品").Find("id = " & "\'" & dr("productid") & "\'" )
   
    If fdr IsNot Nothing \'如果找到, 则设置各列内容      
        dr("商品名")= fdr("cn_name")      
    End If   
Next

[此贴子已经被作者于2014-8-17 9:17:19编辑过]

--  作者:jinzhengbe
--  发布时间:2014/8/17 11:18:00
--  谢谢啊~~
谢谢啊~~图片点击可在新窗口打开查看