Criteria Increment problem

[eww]

I'm not exactly sure why this isn't incrementing because it seems to be working in a similar situation elsewhere.

Dim dbCMC As DAO.Database
Dim strSQL As String
Dim lngChgNum As Long
Dim datChgDate As Date
datChgDate = Date
lngChgNum = DCount("JobNum", "dbo_tblWgtTrack", "[JobNum] = '" & Me.txtJobNum & "' And [Detlr] = '" & Me.cboDtlr & "' And [Segment] = '" & Me.txtSegment & "' And [Desc] = '" & Me.txtDesc & "'")
lngChgNum = lngChgNum + 1
    Set dbCMC = CurrentDb
    strSQL = "INSERT INTO dbo_tblWgtTrack([DetDBID], [JobNum], [Detlr], [Segment], [Desc], [ChgNum], [ChgDate], [DetWgt], [Reason]) " & _
    "VALUES('" & strDetDBID & "', '" & Me.txtJobNum.value & "', '" & strEmpName & "', '" & Me.txtSegment.value & "', '" & Me.txtDesc.value & "', " & lngChgNum & ", #" & datChgDate & "#, '" & Me.txtDetWt.value & "', '" & "Revision" & "')"

It's supposed to run every time the weight is updated, so that if there are any other entries it logs the current weight and what change number it is (based on previous logged changes for that submittal)

[orange]

Do you get an error message?
You could use some debug.print statements to see the values.
What event drives this code?

[eww]

Sorry, don't get an error message, the code mostly works fine, it just doesn't increment for some reason. I did a debug on both the insert string and just the lngChgNum variable and both cases the actual entry was fine, but it just enters a "1", instead of adding a 1 to whatever count it is supposed to produce.

It runs on the AfterUpdate of entering the weight (as an update).

[eww]

Sorry, there was an inaccurate value, it just wasn't where I was expecting it kind of. There was a mismatch between the DCount and Insert statements in the Detailer's name. It's working now, thanks.

[eww]

A side not: I switched to the DMax function instead of DCount, it might be a bit more efficient I figured.

[orange]

Yes, DCount gets you the count of entries with criteria
DMax gives you the value

so Dmax +1 would be the next value.