I love DSUM (Not)

[Guest]

After much work have got the following Dsum to work on
the code event of a combo box change:

intRemainingPayment = DSum
("Ammount","tlbPayments","BookingID = " &
FORM_frmSubBookings!BookingID)

I now need to say:

and CustNo (in tlbPayments table) is the same as
FORM_frmCubCustomers.CustNo

Thanks for your help, I am almost there.

 

[fredg]

After much work have got the following Dsum to work on
the code event of a combo box change:

intRemainingPayment = DSum
("Ammount","tlbPayments","BookingID = " &
FORM_frmSubBookings!BookingID)

I now need to say:

and CustNo (in tlbPayments table) is the same as
FORM_frmCubCustomers.CustNo

Thanks for your help, I am almost there.

I would suggest the Combo box AfterUpdate event, not the change event.
What is the name of the form that this code is on?
If it is on the frm_SubBookings....
You can substitute the Me keyword in place of the form name.

If the name of the form with this code is frmSubBookings, you can use:

intRemainingPayment = DSum ("[Ammount]","tlbPayments","[BookingID] = "
& Me!BookingID & " and [CustNo] = " & Forms!frmCubCustomers!CustNo)

If this is on a different form, then:

intRemainingPayment = DSum ("[Ammount]","tlbPayments","[BookingID] = "
& Forms!NameOfForm!BookingID & " and [CustNo] = " &
Forms!NameOfOtherForm!CustNo)

The above assumes [CustNo] is a Number datatype field.

 

[Ken Snell [MVP]]

intRemainingPayment = DSum("Ammount","tlbPayments", _
"BookingID = " & FORM_frmSubBookings!BookingID & _
" And CustNo = " & FORM_frmCubCustomers.CustNo)

 

[Guest]

CustNo is an int number field.

Thanks