以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  两个数据源数据同步需要怎样做？（已解决）  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=51066)
--  作者：jiterp
--  发布时间：2014/5/19 9:49:00
--  两个数据源数据同步需要怎样做？（已解决）

系统连接了两个数据源，分别为A和B，并分别有两个表：表A1和表B1。

数据源A中的表A1有[AID]、[数量]、[锁定]三个字段；数据源B中的表B1有[BID]、[数量]、[锁定]三个字段。

现要求：当表A1的[AID]=表B1的[BID]，而且表A1[锁定]=2；

那么要求表B1中的[数量]=表A1中的[数量]，B1中的[锁定]=2。

 

在一个数据源里我是用SQL语句处理的，但涉及两个数据源，不会做了，请老师帮忙。

[此贴子已经被作者于2014-5-19 11:18:34编辑过]
--  作者：Bin
--  发布时间：2014/5/19 9:54:00
--  
最笨的方法

for each dr as datarow  in datatables("表A1").datarows
       DataTables("表B1").ReplaceFor("锁定",2,"BID=\'" & dr("AID") & "\'")
next
--  作者：jiterp
--  发布时间：2014/5/19 10:25:00
--  

好象条件不对吧，要求是当表A1的锁定=2，且表A1的AID=表B1的BID，要求执行表B1的数量=表A1的数量，表B1的锁定=2。
--  作者：有点甜
--  发布时间：2014/5/19 10:34:00
--  
For Each dr As DataRow In DataTables("表A1").datarows
    If dr("锁定") = 2 Then
        DataTables("表B1").ReplaceFor("数量", dr("数量"), "BID=\'" & dr("AID") & "\'")
        DataTables("表B1").ReplaceFor("锁定", 2, "BID=\'" & dr("AID") & "\'")
    End If
Next
--  作者：jiterp
--  发布时间：2014/5/19 10:42:00
--  
我总陷在SQL条件where语句中，原来还可以这样写，谢谢！