Dsum() works sometimes

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance



Hi there!

Nikos helped me with this earlier, and it's mostly fixed now, but when I run
the following from a button's click event I get an error when the form, in
going to its on current event runs the next block of code. bytPer is a field
on my form

DoCmd.GoToRecord , , acNewRec
Dim intAns As Integer

intAns = MsgBox("Support for the current period?", vbYesNo + vbQuestion,
"Current Period")
Select Case intAns
Case vbYes
bytPer = PubPer
Case vbNo
bytPer = PubPer + 1
End Select

This next block is in the form's current event. The thing is, when I just
cycle from record to record, the code below works great! Wazzzzup with this?

txtPerTot = DSum("SuppTot", "qrySupport", "bytPer = " & Me.bytPer)

I'm trying to find the largest number in my recordset so that I can put that
total in a text box on my form.

Thanks, John

--
www.brightfuture.ca/bright
My email address can be found on my site.
.


Quantcast