MS Access - SQL Concatenate 有效 - VBA 无效

编程问答 2022-04-21

问题描述

我创建了一个查询来将表中的两个字段连接到同一个表中的第三个字段。

  • 表：[mif_999_sf_item_creation_subcategory_groups]
  • 字段 1：[Product_Group_Code__c]
  • 字段 2：[Subcategory_Group_Code__c]
  • 字段 1&2：[CCat_PrdGrpCd_n_SubCatCd]

查询成功，这里是 sql 代码：

UPDATE mif_999_sf_item_creation_subcategory_groups SET mif_999_sf_item_creation_subcategory_groups.CCat_PrdGrpCd_n_SubCatCd = [Product_Group_Code__c] & "_" & [Subcategory_Group_Code__c];

我使用了 AllenBrowne's code 将 sql 代码转换为 VBA。

但是当我将 VBA 代码粘贴到 VBA 模块中并运行它时，什么也没发生。我没有收到任何错误消息，但两列也没有连接。

Sub test()

strsql = "UPDATE mif_999_sf_item_creation_subcategory_groups SET mif_999_sf_item_creation_subcategory_groups.CCat_PrdGrpCd_n_SubCatCd = [Product_Group_Code__c] & ""_"" & [Subcategory_Group_Code__c];"

End Sub

我尝试在网络和本网站上寻找其他示例，但没有任何效果。

对我做错了什么有任何想法吗？

解决方法

您没有收到任何错误，因为它不存在。你说的工作正常。我猜您想运行在变量 strSql 中分配的查询？

在这种情况下，你需要像下面那样做：

Sub Test()

    strSql = "UPDATE mif_999_sf_item_creation_subcategory_groups SET mif_999_sf_item_creation_subcategory_groups.CCat_PrdGrpCd_n_SubCatCd = [Product_Group_Code__c] & ""_"" & [Subcategory_Group_Code__c];"

    DoCmd.RunSQL strSql

End Sub
concatenationms-accesssqlsql