在訪問中使用帶有 datepart 函數的 dcount

Question

我正在嘗試使用 dcount 函數來檢查今年是否已經制作了“fakturen”。 它似乎不能正常工作。 這是我的代碼：

If DCount("*", "fakturen", "[DatePart('yyyy', [fakturen].[faktuurDatum])] = #" & [DatePart('yyyy', Forms![f_fakturen]![faktuurDatum])] & "#") > 0 Then
  strFoutmelding = "Facturen al aanwezig"
  GoTo Jaar_fakturen_Click_Error
End If

我使用以下代碼作為示例：

' Dates
variable = DCount("[FieldName]", "TableName", "[Criteria] = #" & Forms!FormName!ControlName & "#")
' ***************************

Answer 1

為什么不是年？

Year(faktuurDatum)

"Year(faktuurDatum)=" & Year(Forms![f_fakturen]![faktuurDatum])

如果你真的想要 DatePart：

If DCount("*", "fakturen", "DatePart('yyyy',[faktuurDatum]) = " _
    & DatePart("yyyy", Forms![f_fakturen]![faktuurDatum])) > 0 Then

Datepart('yyy' ...將返回一個數字，而不是一個日期，因此您不需要分隔符。