DCount()

[L'apprentis]

This is the first time I am trying to use the Dcount Function and I can't make it work; I don't see why? This is my code which Is very simple, is anybody sees any mistakes?

Private Sub TxtDrawingFile_AfterUpdate()

Dim StrDrawingCount As String
StrDrawingCount = DCount([DrawingFileID], TblDrawingFile, [DrawingFile] = Me!TxtDrawingFile)
Me!TxtEssai = StrDrawingCount

End Sub

 

[Bat17]

If DrawingFile is a string
StrDrawingCount = DCount("[DrawingFileID]", "TblDrawingFile", "[DrawingFile] = '" & Me!TxtDrawingFile & "'")

Else

StrDrawingCount = DCount("[DrawingFileID]", "TblDrawingFile", "[DrawingFile] = " & Me!TxtDrawingFile )

HTH

Peter