Auto check date on open

[Xenix]

Can anyone help me with code for a 1 week flag I need in my database?

I generate quotations, after a quotation has been submitted for one week I want it to flag up with a box on that customer and say this Quotation has not been chased up?

anyone know how to do this?

Regards

Mike

 

[Travis]

You will need to look up the Quotation (I do not know your structure so I can't say How you would do this accuratly)

Return the date submitted and the Chased up date.

Check to see if DateAdd("w",1,[Submitted Date]) > Date()

If it is then it has been more then a week.

You can then use the Chased Up date to cancel your message box if one exists. You could even check this first.

Then use the MsgBox Function to return your message. The best place for this code would be on the Form_Current Event.

 

[Xenix]

Thank you my friend

found this works great.

If DateDiff("y", [Dateq], Now) > 7 & checksum <> 1 Then
MsgBox "Quotations over 1 week outstanding", , "Quotation Alert"
End If

Now I just need to work out how to put a tick box on a msgbox that updates the field name checksum in my quotations table?

know anything?

Thanks again

Mike

 

[Fizzio]

Use a small dialog form rather than a message box. It makes it more configurable.