ms-access - 在访问中使用 dcount 和 datepart 函数

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' ...将返回一个数字，而不是日期，因此您不需要分隔符。