Hello Everyone.....
in our unit we changes worker shift at 07:00 AM and 07:00 PM. the DAY SHIFT is from 07:00 AM to 07:00 PM, and NIGHT SHIFT is 07:00 PM to 07:00 AM. In production form i set a textbox named PRDATE and a combo box named SHIFT that fill the textbox value with its last saved value looking table's max ID using
PRDATE.Value = DLookup("PRDATE", "MDFPRD", "ID = " & DMax("ID", "MDFPRD", "ID < " & Me.ID))
SHIFT.Value = DLookup("SHIFT", "MDFPRD", "ID = " & DMax("ID", "MDFPRD", "ID < " & Me.ID)) it works great.
here is want the PRDATE value change automatically at 07:00 am with current date and SHIFT value change into DAY
in our unit we changes worker shift at 07:00 AM and 07:00 PM. the DAY SHIFT is from 07:00 AM to 07:00 PM, and NIGHT SHIFT is 07:00 PM to 07:00 AM. In production form i set a textbox named PRDATE and a combo box named SHIFT that fill the textbox value with its last saved value looking table's max ID using
PRDATE.Value = DLookup("PRDATE", "MDFPRD", "ID = " & DMax("ID", "MDFPRD", "ID < " & Me.ID))
SHIFT.Value = DLookup("SHIFT", "MDFPRD", "ID = " & DMax("ID", "MDFPRD", "ID < " & Me.ID)) it works great.
here is want the PRDATE value change automatically at 07:00 am with current date and SHIFT value change into DAY