Office中国论坛/Access中国论坛

标题: [求助]新增子表单(窗体)的记录到另一张资料表 [打印本页]

作者: ememem    时间: 2006-1-10 07:24
标题: [求助]新增子表单(窗体)的记录到另一张资料表
假设我有一张名为《客户订单》的主表,并带有一张《客户订单明细》的子表

《客户订单明细》的栏位有

订单序号               品号         数量     销售单价     总价

060109001           x001        100            50        5000

060109002          S008          50            10         500

========

然后,我另有一张名为《采购单明细》的资料表,栏位有

订单序号            品号        数量

我想在《客户订单》主表设一「储存」按键,当按下后,可以自动逐条检查比对《客户订单明细》的《订单序号》及

《采购单明细》中《订单序号》,若采购单明细中没有,就自动在《采购单明细》资料表中新增一笔资料

那,我只知道

set TBL=currentdb.openrecordset("采购单明细")

If dcount("订单序号","采购单明细","订单序号='" & [forms]![客户订单明细]![订单序号]"'")=0 then

TBL.addnew

TBL("订单序号")=[forms]![客户订单明细]![订单序号]

tbl("品号")=[forms]![客户订单明细]![品号]

tbl("数量")=[forms]![客户订单明细]![数量]

tbl.update

TBl.close

else

msgbox("已有资料")

end if

可是,为什麽,没有任何动作?不会在《采购单明细》中新增。而且,我知道这样也不能逐条比对,有没有办法在主窗体中按下储存键后可逐条比对子窗体的资料,而不是要在子窗体的某一栏位中设「事件」呢?谢谢!!
作者: 一点通    时间: 2006-1-10 07:29
用不匹配查询,然后将数据追回到另一个表




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3