Access开发平台--如何将计算结果写入表中

时　间:2016-11-14 08:10:27
作　者:MDZZ   ID：47512  城市：南京
摘　要:计算结果写入表中
正　文:

近日 在论坛看到一个问题 这位网友问题如下

开发平台--如何将公式的计算结果写入后台数据库

我在平台上有个子窗体，其中的不含税金额和含税金额是用公式计算出来的，但是这个计算结果无法保存到后台数据库内，临时表已经有2个计算字段了。

保存按钮的部分代码如下：       

  strSQL = "Select * FROM [tbl_高压管销售商品明细] Where [单据编号]=" & SQLText(Me![单据编号])
    Set rst = OpenADORecordset(strSQL, adLockOptimistic, cnn)
    Do Until rst.EOF
        rst.Delete
        rst.MoveNext
    Loop
    Set rstTmp = CurrentDb.OpenRecordset("TMP_tbl_高压管销售商品明细")
    Do Until rstTmp.EOF
        rst.AddNew
        rst![单据编号] = Me![单据编号]
        rst![序号] = rstTmp![序号]
        rst![送货日期] = rstTmp![送货日期]
        rst![送货单号] = rstTmp![送货单号]
        rst![品名] = rstTmp![品名]
        rst![规格型号] = rstTmp![规格型号]
        rst![订单号码] = rstTmp![订单号码]
        rst![订单项目] = rstTmp![订单项目]
        rst![单位] = rstTmp![单位]
        rst![数量] = rstTmp![数量]
        rst![不含税单价] = rstTmp![不含税单价]
        rst![不含税金额] = rstTmp![不含税金额]
        rst![含税金额] = rstTmp![含税金额]
        rst![含税单价] = rstTmp![含税单价]

    rst.Update
        rstTmp.MoveNext
    Loop
    rst.Close
    rstTmp.Close
       

我问他 计算字段有保存到临时表 吗  他回答没有  因为这个字段是通过公式计算出来的，所以不会写入临时表的既然知道没有保存到临时表  那没保存到所需要的表中不也是正常的吗  

解决办法:

rst![不含税金额] = rstTmp![不含税单价]*rstTmp![数量]

rst![含税金额] = rstTmp![含税单价]*rstTmp![数量]

 原帖链接   http://www.accessoft.com/bbs/showtopic.asp?id=26904