Date Mgmt - Today minus 1 at month change

[edauthier]

Hi,
Related to this old post..
http://www.mjtnet.com/forum/viewtopic.php?p=21137#21137

Need to send an application a date in this format:
2010-06-30. So, yyyy-mm-dd. Today, I will need to send 2010-06-30, but the vbscript I am using sends 2010-07-00. Very literally today -1..

The code works perfectly except at the turn of the month.

Here's what I use and assistance is appreciated.

Code: Select all

VBSTART
VBEND
VBEval>Right("0" & DatePart("m", Now()),2) & "/" & Right("0" & DatePart("d", Now())-1,2) & "/" & DatePart("yyyy",Now()),date
separate>date,/,parts
message>%parts_3%-%parts_1%-%parts_2%

[Marcus Tettmar]

Your code only subtracts one from the day number. It doesn't subtract anything from the current date.

This does what you want:

Code: Select all

VBSTART
VBEND

VBEval>DateAdd("d",-1,date),yesterday
VBEval>Right("0" & DatePart("d","%yesterday%"), 2),day_bit
VBEval>Right("0" & DatePart("m","%yesterday%"), 2),month_bit
VBEval>DatePart("yyyy","%yesterday%"),year_bit

Let>formatted_date=%year_bit%-%month_bit%-%day_bit%

MessageModal>formatted_date

[edauthier]

I don't care what they say about you Marcus.. YOU'RE THE BEST...!!