Send Date

[Fuse 0]

Hey there,

I'm very new to AutoIT, in fact this is my first script! I am trying to make a script to make our tape backup software more automated. This is what I have achieved so far and works well enough but I need a way of inserting the correct date:

=================================================

run("C:\program files\CA\BrightStor ARCserve Backup\BrightStorMgr.exe")

Sleep(3000)

MouseClick("left", 23, 280, 1)

Sleep(3000)

MouseClick("left", 252, 214, 1)

MouseClick("left", 477, 107, 1)

Send("DD/MM/YY")

ControlClick("Format", "", "[iD:1]")

Sleep(60000)

=================================================

How can I insert the date of the server so that the tape gets formated with the correct date?

Thanks

[GEOSoft 64]

$sDate = @MDAY & "/" & @Mon & "/" & StringRight(@Year, 2)
Send($sDate)

Edited March 11, 2009 by GEOSoft

[Fuse 0]

Perfect!

Thanks for that

[GEOSoft 64]

Perfect!

Thanks for that

You are most welcome. Here is a better version to use if you always want day and month to have a leading 0 when less than 10. instead of 1/1/10, it will return 01/01/10

$Date = StringFormat("%02u/%02u/", @MDAY, @MON) & StringRight(@Year, 2)
Send($Date)

[Fuse 0]

Thanks for that GEOSoft I will use the updated one. I have one more question, is there a way to add the day infront of the date? For example, THURSDAY 12/03/09 (reason for this is thats how its always been on all our tapes, would be good to keep it the same) If that is not possible I'm not too bothered would just be nice. I have completed the script to start/shutdown application, format eject etc, very handy

[muncherw 0]

$Date = StringFormat(" %02u/%02u/", @MDAY, @MON) & StringRight(@Year, 2)
$iWeekday = _DateToDayOfWeek (@YEAR, @MON, @MDAY)
$day = _DateDayOfWeek($iWeekday)
Send($day & " " & $date)

[GEOSoft 64]

Thanks for that GEOSoft I will use the updated one. I have one more question, is there a way to add the day infront of the date? For example, THURSDAY 12/03/09 (reason for this is thats how its always been on all our tapes, would be good to keep it the same) If that is not possible I'm not too bothered would just be nice. I have completed the script to start/shutdown application, format eject etc, very handy

Sure. Just use the @WDay Macro with an array.

$aDay = StringSplit("Sunday|Monday|Tuesday|Wednesday|Thursday|Friday|Saturday", "|")
$Date = StringFormat("%s %02u/%02u/", $aDay[@WDAY],@MDAY, @MON) & StringRight(@Year, 2)
Send($Date)

If you want more spaces between the weekday and the date just add them between the %s and the next % sign.