Foxtable(狐表)用户栏目专家坐堂 → [求助]跨表更新


  共有3173人关注过本帖树形打印复制链接

主题:[求助]跨表更新

帅哥哟,离线,有人找我吗?
lesliecheung912
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
[求助]跨表更新  发帖心情 Post By:2014/9/29 16:02:00 [只看该作者]

现在有两张表,并没有关联,现已做到表A增加一条数据,表B也增加一条同样的数据。
现在的问题是在修改表A的某一列时,需要从表B中找到对应的数据并修改相应的列,
这个在Datacolchanged事件里实现不了啊,我现在的代码为:
if e.DataCol.Name =“产品” then
Dim r = Tables("库房明细").Current
Dim r1 As DataRow
r1 = DataTables("库房入库").Find("[入库单号] ='" & r("调拨单号") & "' and [收货仓库] ='" & r("收货仓库") & "' and [产品名称] ='" & r("产品名称") & "' and [数量] ='" & r("数量") & "'")
If  r1 IsNot Nothing Then '如果找到的话
    r1("产品名称") = r("产品名称")
End If
end if
但问题是这个产品名称改变了,那么r1就找不到了,那么应该解决这个问题呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/29 16:06:00 [只看该作者]


 回到顶部