Fejl i Group By
Der er en fejl i koden (Group By) men jeg kan ikke finde fejlen. Er der nogen der kan gennemskue det?---
If Not IsNull(DLookup("[No_]", "[dbo_vw_Thorn_Svenska_AB$Customer]", "[No_]=txtKundenr")) Then
sSQL = "INSERT INTO tblBrevBokning ([Cus_IdNo], [Rec_Name1], [Rec_Name2], [Rec_Adress1], [Rec_Adress2], [Rec_Zip], [Rec_City], [Amount], [AmountAllowed])" & vbCrLf & _
"SELECT (CUS.[No_]), (CUS.[First Name]), (CUS.[Last Name]), (CUS.[Address]), (CUS.[Address 2]), (CUS.[Post Code]), (CUS.[City]), SUM(CLE.[Remaining Amount]) AS CLE.[Amount], '" & Me.AmountAllowed & "' " & vbCrLf & _
"FROM [dbo_vw_Thorn_Svenska_AB$Customer] AS CUS,[dbo_vw_Thorn_Svenska_AB$Cust__Ledger_Entry] AS CLE WHERE CLE.[Customer No_] = CUS.[No_] AND CUS.[No_] = '" & txtKundenr.Value & "' " & vbCrLf & _
"GROUP BY (CUS.[No_]),(CUS.[First Name]), (CUS.[Last Name]), (CUS.[Address]), (CUS.[Address 2]), (CUS.[Post Code]), (CUS.[City]), '" & Me.AmountAllowed & "' "
DoCmd.RunSQL sSQL
