Help with date formats

[jamesnewbie]

I've spent ages trying to figure out who to add 7 days to the current date and put it into DDMMYY format.

I can do both indivdually MsgBox ( 0, "DDMMYY", @MDAY & @MON & StringRight (@Year, 2 ) ) and $sNewDate = _DateAdd( 'd',5, _NowCalcDate()) but can't do both.

Any help would be appreciate - oh I also need to SEND it so please advise how I send the variable once it's calculated and formatted.

Send("090708")

Thanks

[Jos]

Something like this:

#include<date.au3>
$sNewDate = _DateAdd('d', 5, _NowCalcDate())
$aNewDate = StringSplit($sNewDate,"/")
$Date = $aNewDate[3] & $aNewDate[2] & $aNewDate[1]

Jos

[weaponx]

#include <Date.au3>

Dim $MyDate
Dim $MyTime

$sNewDate = _DateAdd( 'd',7, _NowCalcDate())
_DateTimeSplit($sNewDate,$MyDate,$MyTime)

$NewDate = StringFormat("%02i%02i%s",$MyDate[3],$MyDate[2],StringRight($MyDate[1],2))

MsgBox(0,"",$NewDate)

Edited July 3, 2008 by weaponx

[weaponx]

#include <Date.au3>
$sNewDate = _DateAdd( 'd',7, _NowCalcDate())
;Convert YYYY/MM/DD to DDMMYYYY
$new = StringRegExpReplace($sNewDate, "\A(\d{4})/(\d{2})/(\d{2})","$3$2$1")
MsgBox(0,"",$new)oÝ÷ Ù«­¢+Ø¥¹±Õ±ÐíѹÔÌÐì(ÀÌØíÍ9ÝÑô}Ñ ÌäíÌäì°Ü°}9½Ý
±Ñ ¤¤(í
½¹ÙÉÐeeed½54½Ñ¼55ed(ÀÌØí¹ÜôMÑÉ¥¹IáÁIÁ± ÀÌØíÍ9ÝÑ°ÅÕ½ÐìÀäÈí¸¸ ÀäÈíìÉô¤¼ ÀäÈíìÉô¤¼ ÀäÈíìÉô¤ÅÕ½Ðì°ÅÕ½ÐìÀÌØìÌÀÌØìÈÀÌØìÄÅÕ½Ðì¤)5Í   ½à À°ÅÕ½ÐìÅÕ½Ðì°ÀÌØí¹Ü¤

Edited July 3, 2008 by weaponx

[jamesnewbie]

Excellent - thank you very much for your help - really appreciate it muttley