Office中国论坛/Access中国论坛

标题: 关于插入表问题！ [打印本页]

作者: stvent 时间: 2009-8-14 14:50
标题: 关于插入表问题！
以下代码运行是正常的，import_tempTalbeA为表，stID以及g_CurrentUserID为定义的函数，用于记录变量数据的，请问如何可以在上述插入语句后，再将StID及g_CurrentUserID的值加入到import_tempTableA中！使得import_temTableA在插入数据后基础上再增加栏位“入库单ID”及“操作员”的值。
(表.import_temTableA 已有字段"入库单ID,事务号, 采购单ID, 行号, 物料编号, 单价, 数量, 单位, 入库日期, 入单日期, 总价,操作员")

DoCmd.RunSQL "INSERT INTO import_tmpTableA ( 事务号, 采购单ID, 行号, 物料编号, 单价, 数量, 单位, 入库日期, 入单日期, 总价) SELECT QAD_TR_HIST.TR_TRNBR, QAD_TR_HIST.TR_NBR, QAD_TR_HIST.TR_LINE, QAD_TR_HIST.TR_PART, QAD_TR_HIST.TR_PRICE, QAD_TR_HIST.TR_QTY_LOC, QAD_TR_HIST.TR_UM, QAD_TR_HIST.TR_EFFDATE, QAD_TR_HIST.TR_DATE, (QAD_TR_HIST.TR_PRICE * QAD_TR_HIST.TR_QTY_LOC) FROM QAD_TR_HIST WHERE (((QAD_TR_HIST.TR_EFFDATE) Between [forms]![数据导入]![sdata] And [forms]![数据导入]![edata]) AND ((QAD_TR_HIST.TR_TYPE)='RCT-PO') AND ((QAD_TR_HIST.TR_LOC)='Mainten') AND ((QAD_TR_HIST.TR_DOMAIN)='GD')) ORDER BY QAD_TR_HIST.TR_EFFDATE DESC"

作者: Henry D. Sy 时间: 2009-8-14 15:58
再将StID及g_CurrentUserID的值加入到import_tempTableA中！使得import_temTableA在插入数据后基础上再增加栏位“入库单ID”及“操作员”的值。
？？？？？？？？？？？

作者: stvent 时间: 2009-8-14 21:58
简单打个比方吧，现有A表（import_tempTableA），B表(QAD_TR_HIST.TR)，以及定义的StID(用于记录入库单ID的)及g_CurrentUserID（获取当时操作员ID），当运行DoCmd.RunSQL "INSERT INTO.....后（即从B表选择相应字段插入到A表），而A表字段中我设计了有入库单ID字段及操作员字段(即运行插入语句后还剩下以上两个字段值是空的)，现打算将StID及g_CurrentUserID的值插进A表中，便得A表完整！

作者: Henry D. Sy 时间: 2009-8-14 22:39
入库单ID：如果是自动编号会自动添加的
操作员：定义一个公共变量来保存，追加记录时将变量追加进去。

作者: stvent 时间: 2009-8-15 10:48

入库单ID：如果是自动编号会自动添加的
操作员：定义一个公共变量来保存，追加记录时将变量追加进去。
Henry D. Sy 发表于 2009-8-14 22:39

Henry,能再指引一下嘛？代码不知如何写

作者: Henry D. Sy 时间: 2009-8-15 10:50
你应该整个简单能说明问题的例子来

作者: stvent 时间: 2009-8-16 12:14
登陆账号选择:admin 密码：2009 由于原系统值取于QAD上，所以我把表（QAD_TR_HIST）一部份数据下载到数据库内！入库单ID是取值于StID的，而g_CurrentUser是取值于当前登陆用户，当完成数据下载后，会显示查询所得数据只要按下导入，就会将数据导入到表.入库单明细中，现时我所想要达到的效果为，当按下下载时，stID及g_CurrentUser填充到所查询的数据表中，即图1所见空白字段栏位(StID的取值条件是查询入库单中的"入库单ID"最后一记录，然后自加1，每个"采购单ID"只记录为一条入库单记录，即"入库单ID"对应一条"采购单ID"，而"采购单ID"则对应多个"行号"(见图2))，可参考数据库表内的入库单与入库单明细关系！另外，就是，如何向两表追加入以上的数据！

作者: stvent 时间: 2009-8-16 15:11

作者: stvent 时间: 2009-8-16 16:27

作者: stvent 时间: 2009-8-16 18:21

作者: stvent 时间: 2009-8-17 10:25
沉了

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)