coding help

[dxiong]

Here is my situation:

I'm trying to create a scheduling form for my users to
schedule deliverables. The users will define the
deliverables for each client and set start and due dates
for each deliverable defined. I could get everything
working fine up to this point. My challenge is when a
deliverable could not be meet and had to delay. I want
the users to be able to just enter the number of days
that will be delay on an unbound control and click a
command button to recalculate/reschedule the dates. If
the rescheduling date falls on a weekend, I want the
process to know so that it will use the next Monday date.

For example:
Client A has 5 deliverables schedule for July:
Deliverable 1, Deliverable 2, Deliverable
3, Deliverable 4, and Deliverable 5.

Deliverable 1 starts and due 7/22
Deliverable 2 starts and due 7/23
Deliverable 3 starts and due 7/26
Deliverable 4 starts and due 7/27
Deliverable 5 starts and due 7/28
If there is a problem and the deliverables could
not be meet and had to delay 2 days, then the revise date
should be:
Deliverable 1 starts and due 7/26
Deliverable 2 starts and due 7/27
Deliverable 3 starts and due 7/28
Deliverable 4 starts and due 7/29
Deliverable 5 starts and due 7/30
TIA if anyone can help.

 

[John Vinson]

If there is a problem and the deliverables could
not be meet and had to delay 2 days, then the revise date
should be:
Deliverable 1 starts and due 7/26
Deliverable 2 starts and due 7/27
Deliverable 3 starts and due 7/28
Deliverable 4 starts and due 7/29
Deliverable 5 starts and due 7/30

You don't say how your tables are structured, but if you have a date
field you can update it to

=DateAdd("d", 2, [fieldname])

to add two days to the date currently in the field.

 

[dxiong]

The field is date/time format. But how do you avoid the
dates that falls on a weekend?

-----Original Message-----

If there is a problem and the deliverables could
not be meet and had to delay 2 days, then the revise date
should be:
Deliverable 1 starts and due 7/26
Deliverable 2 starts and due 7/27
Deliverable 3 starts and due 7/28
Deliverable 4 starts and due 7/29
Deliverable 5 starts and due 7/30

You don't say how your tables are structured, but if you have a date
field you can update it to

=DateAdd("d", 2, [fieldname])

to add two days to the date currently in the field.


.

 

[John Vinson]

The field is date/time format. But how do you avoid the
dates that falls on a weekend?

That wasn't what you asked... <g>

There are some good weekday-sensitive VBA functions available. See the
Access Web article:

http://www.mvps.org/access/datetime/date0012.htm