2016-02-20 94 views
1

當我做了DoCmd.RunSQL SQL在VBA MS Access命令此更新不起作用:更新的MS Access不工作

UPDATE T SET T.Quantità = T.Quantità - C.SommaDiQuantità 
    FROM [Scorta a magazzino] AS T INNER JOIN (SELECT [Pazienti-Medicinali].[ID Medicinale], Sum([Pazienti-Medicinali].Quantità) AS SommaDiQuantità 
    FROM [Pazienti-Medicinali] GROUP BY [Pazienti-Medicinali].[ID Medicinale]) AS C 
    ON T.[ID Medicinale] = C.[ID Medicinale] 

有人能幫助我嗎?

回答

0

訪問不允許您對分組數據執行更新。

通常情況下,您必須將其分解爲兩個步驟,首先將相加的值加載到表中,然後鏈接到此表並執行更新。

如果你真的想要一個解決辦法,我認爲你可以做這樣的事情:

UPDATE [Scorta a magazzino] AS T 
SET T.Quantità = T.Quantità - Nz(DSUM("Quantità", "[Pazienti-Medicinali]", "[ID Medicinale] = " & T.[ID Medicinale]), 0)