【发布时间】:2020-07-13 20:24:04
【问题描述】:
嗨,我正在尝试将值插入到我的输出表中 在我的输入表中有
额外利润
10 20
当我插入到我的输出表中时,它应该被连接为
费用
1020
sub test()
Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db = CurrentDb
db. execut "Insert into OUTPUT_TBL (DESCRIPTION,COST,DEBIT,CREDIT) " & _
" SELECT INPUT.DESCRIPTION,((INPUT.PROFIT)+(INPUT.EXTRA)) AS COST," & _
" IIF(EXTERNAL.SOLUTION='DEBIT',(AMOUNT),0) as DEBIT, " & _
" IIF(EXTERNAL.SOLUTION='CREDIT',(AMOUNT),0) AS CREDIT " & _
" FROM INPUT , EXTERNAL"
db.close
end test
当我尝试运行它时,我收到了运行时错误 3075 的错误
【问题讨论】:
标签: ms-access vba ms-access-2010