以文本方式查看主题

-  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=43664)

--  作者:kgdwxfmqj520
--  发布时间:2013/12/12 15:02:00
--  跨表选择逻辑列

          如何通过一个按钮选中“出库明细表”中的“已对账”列,并对设为true?

我试了很多次都没有效果。。。。。

 


--  作者:Bin
--  发布时间:2013/12/12 15:08:00
--  
已对账 不就是一句为TRUE了吗?  

可以使用 replacefor 


--  作者:kgdwxfmqj520
--  发布时间:2013/12/12 15:56:00
--  
搞定
--  作者:kgdwxfmqj520
--  发布时间:2013/12/12 21:35:00
--  
Dim s As String  = DataTables("批量对账明细").GetComboListString("出库单号")
For Each dr As DataRow In DataTables("出库主表").Select("[出库单号] = \'s\'")
    dr("已对账") = True
Next

不得行。

--  作者:有点甜
--  发布时间:2013/12/12 21:45:00
--  
 4楼的代码。理解你要达到什么需求。

Dim ls As List(of String)  = DataTables("批量对账明细").GetValues("出库单号", "已对账 = true")
For Each s As String In ls
    Dim fdr As DataRow = DataTables("出库主表").find("[出库单号] = \'" & s & "\'")
    If fdr IsNot Nothing Then
        fdr("已对账") = True
    End If
Next

--  作者:kgdwxfmqj520
--  发布时间:2013/12/13 9:58:00
--  
这样选择的是批量对账明细里所有的出库单号,返回到出库主表的时候就会将所有的已对账列设置为真,达不到想要的效果。
--  作者:Bin
--  发布时间:2013/12/13 10:01:00
--  
你到底是想怎么样,上例子,描述清楚需求.