This is what I tried next. I can't get a date to enter into the field SignaturesComplete. What should I use as the control source?Code:Private Function getMaxSigDate() As Date Const fldName = "dwfDateComplete" Const tblName = "tblDocWorkFlow" Dim strWhere As String strWhere = "dwfTitleNo = 2 And dwfDocID = " & Me.docID getMaxSigDate = Nz(DMax(fldName, tblName, strWhere), 0) Me.SignaturesComplete = getMaxSigDate End Function




Reply With Quote
