将 Case 语句用于 INSERT INTO VBA

时间:2021-01-22 19:47:27

标签: sql vba ms-access

我正在尝试在 Insert INTO 中使用 case 语句来更新我的 Access 数据库表。

由于 MasterQuery 只有一个零售列用于高零售 (Req_High_Retail),而 RCR_tbl 有两个(EB 零售、原始)但两者都使用相同的 DRC,我试图使用 case 语句来确定要转储的列将 Req_High_Retail 导入。

当我的这部分代码运行时,我遇到了语法错误。我不确定我错过了什么,我还没有真正在 Access 中使用 INSERT INTO 函数。 任何帮助将不胜感激!

我当前的代码:

DoCmd.RunSQL "INSERT INTO RCR_tbl([Pack], [New_Retail1], [EB High], [Catalog], [Original], [DRC], [Description], [Requested], [Season], [Completed], [Request_Completed_Date], [Request_Status]) " _
& "SELECT [Pack_Number], [Req_Low_Retail], Case when [Req_DRC] = 'EB' then [Req_High_Retail] else '0' END, [CatID], [Req_High_Retail], [Req_DRC], [Description], '" & Owner & "', [Season], '', 'NOW()', 'Complete' FROM MasterQuery"

主查询:

Pack_Number Description       CatID Req_Low_Retail  Req_High_Retail  Req_DRC     
6764037        Name         DA  $79.99              $99.99           EB      
6764037        Name         DB  $79.99              $99.99           RL      
6764037        Name         DC  $79.99              $99.99           EB 

RCR_tbl:

Pack     New_Retail1    EB High  Catalog   Original DRC  Description
6764037  79.99          99.99    DA        0        EB   NAME                       
6764037  79.99          0        DB        99.99    RL   NAME                       
6764037  79.99          99.99    DC        0        EB   NAME

谢谢!

0 个答案:

没有答案
相关问题