在 UPDATE 查询中使用 SELECT

Question

如何使用 Microsoft Access 2007 中 SELECT 查询的结果UPDATE表的字段。

这是选择查询：

SELECT Min(TAX.Tax_Code) AS MinOfTax_Code
FROM TAX, FUNCTIONS

WHERE (((FUNCTIONS.Func_Pure)<=[Tax_ToPrice]) AND ((FUNCTIONS.Func_Year)=[Tax_Year]))

GROUP BY FUNCTIONS.Func_ID;

这是更新查询：

UPDATE FUNCTIONS

 SET FUNCTIONS.Func_TaxRef = [Result of Select query]

Answer 1

嗯，看来 Access 无法在 UPDATE 查询中进行聚合。 但它可以在 SELECT 查询中进行聚合。 因此，创建一个具有如下定义的查询：

SELECT func_id, min(tax_code) as MinOfTax_Code
FROM Functions
INNER JOIN Tax 
ON (Functions.Func_Year = Tax.Tax_Year) 
AND (Functions.Func_Pure <= Tax.Tax_ToPrice) 
GROUP BY Func_Id

并将其保存为 YourQuery。 现在我们必须解决另一个访问限制。 UPDATE 查询不能对查询进行操作，但可以对多个表进行操作。 因此，让我们使用 Make Table 查询将查询转换为表：

SELECT YourQuery.* 
INTO MinOfTax_Code
FROM YourQuery

这会将视图的内容存储在名为 MinOfTax_Code 的表中。 现在您可以执行更新查询：

UPDATE MinOfTax_Code 
INNER JOIN Functions ON MinOfTax_Code.func_id = Functions.Func_ID 
SET Functions.Func_TaxRef = [MinOfTax_Code].[MinOfTax_Code]

在 Access 中执行 SQL 有点困难，我会为您的项目研究 Sql Server Express Edition！

Answer 2

我写了一些有关 Access/JET SQL 中相关子查询的限制的文章不久前，注意到连接多个表进行 SQL UPDATE 的语法。 根据该信息和一些快速测试，我认为没有任何方法可以在单个 SQL UPDATE 语句中使用 Access/JET 执行您想要的操作。 如果可以的话，该语句将如下所示：

UPDATE FUNCTIONS A
INNER JOIN (
  SELECT AA.Func_ID, Min(BB.Tax_Code) AS MinOfTax_Code
  FROM TAX BB, FUNCTIONS AA
  WHERE AA.Func_Pure<=BB.Tax_ToPrice AND AA.Func_Year= BB.Tax_Year
  GROUP BY AA.Func_ID
) B 
ON B.Func_ID = A.Func_ID
SET A.Func_TaxRef = B.MinOfTax_Code

另外，Access/JET 有时会让您将子查询保存为单独的查询，然后以更传统的方式将其连接到 UPDATE 语句中。 因此，例如，如果我们将上面的 SELECT 子查询保存为名为 FUNCTIONS_TAX 的单独查询，则 UPDATE 语句将是：

UPDATE FUNCTIONS
INNER JOIN FUNCTIONS_TAX
ON FUNCTIONS.Func_ID = FUNCTIONS_TAX.Func_ID
SET FUNCTIONS.Func_TaxRef = FUNCTIONS_TAX.MinOfTax_Code

但是，这仍然不起作用。

我相信完成这项工作的唯一方法是将最小 Tax_Code 值的选择和聚合移至带外。 您可以使用 VBA 函数来完成此操作，或者使用 Access DLookup 函数更轻松地完成此操作。 将上面的 GROUP BY 子查询保存到名为 FUNCTIONS_TAX 的单独查询中，并将 UPDATE 语句重写为：

UPDATE FUNCTIONS
SET Func_TaxRef = DLookup(
  "MinOfTax_Code", 
  "FUNCTIONS_TAX", 
  "Func_ID = '" & Func_ID & "'"
)

请注意，DLookup 函数可防止在 Access 外部使用此查询，例如通过 JET OLEDB。 此外，这种方法的性能可能非常糟糕，具体取决于您的目标行数，因为正在为每个 FUNCTIONS 行执行子查询（因为，当然，它不再相关，这就是顺序的全部要点使其发挥作用）。

祝你好运！

Answer 3

我有类似的问题。 我想在一列中找到一个字符串，并将该值放入同一个表的另一列中。 下面的 select 语句查找括号内的文本。

当我在 Access 中创建查询时，我选择了所有字段。 在该查询的 SQL 视图中，我将 mytable.myfield 替换为我想要从括号内获取值的字段，并

SELECT Left(Right(OtherField,Len(OtherField)-InStr((OtherField),"(")), 
            Len(Right(OtherField,Len(OtherField)-InStr((OtherField),"(")))-1) 

运行了 make table 查询。 make table 查询具有上述替换的所有字段，并以 INTO NameofNewTable FROM mytable 结尾

Answer 4

这有效吗？ 未经测试，但应该能表达要点。

UPDATE FUNCTIONS
SET Func_TaxRef = 
(
  SELECT Min(TAX.Tax_Code) AS MinOfTax_Code
  FROM TAX, FUNCTIONS F1
  WHERE F1.Func_Pure <= [Tax_ToPrice]
    AND F1.Func_Year=[Tax_Year]
    AND F1.Func_ID = FUNCTIONS.Func_ID
  GROUP BY F1.Func_ID;
)

基本上，对于 FUNCTIONS 中的每一行，子查询确定当前最低税码并将 FUNCTIONS.Func_TaxRef 设置为该值。 这是假设 FUNCTIONS.Func_ID 是主键或唯一键。

Answer 5

我确实想再添加一个利用 VBA 函数的答案，但它确实可以通过一条 SQL 语句完成这项工作。 不过，它可能会很慢。

UPDATE FUNCTIONS
SET FUNCTIONS.Func_TaxRef = DLookUp("MinOfTax_Code", "SELECT
FUNCTIONS.Func_ID,Min(TAX.Tax_Code) AS MinOfTax_Code
FROM TAX, FUNCTIONS
WHERE (((FUNCTIONS.Func_Pure)<=[Tax_ToPrice]) AND ((FUNCTIONS.Func_Year)=[Tax_Year]))
GROUP BY FUNCTIONS.Func_ID;", "FUNCTIONS.Func_ID=" & Func_ID)

Answer 6

我知道这个主题很旧，但我想我可以添加一些东西。

我无法在 MS Access 2010 中使用 SQL 来使用 Select 查询进行更新。我使用 Tomalak 的建议来完成这项工作。 我有一个屏幕截图，但显然我是这个网站上的新手，无法发布它。

我可以使用查询设计工具来完成此操作，但即使当我查看已确认成功的更新查询时，Access 也无法向我显示实现此操作的 SQL。 所以我无法单独使用 SQL 代码来完成这项工作。

我创建了选择查询并将其保存为单独的查询。 在查询设计工具中，我添加了我试图更新已保存的选择查询的表（我将唯一键放入选择查询中，因此它们之间有链接）。 正如托马拉克所建议的，我将查询类型更改为更新。 然后我只需选择我要更新的字段（并指定表）。 在“更新到”字段中，我输入了引入的选择查询中的字段名称。

这种格式成功并更新了原始表。