Запросить сегодняшнюю дату

$sDate = "21/12/2010"
If @MDAY & "/" & @MON & "/" & @YEAR > $sDate Then Exit

MsgBox(64, 'Title', 'Ok')

$sDate = "08/03/2013"
If @MDAY & "/" & @MON & "/" & @YEAR < $sDate Then Exit

MsgBox(64, @MDAY & "/" & @MON & "/" & @YEAR , 'Ok')

#include <Date.au3>
;$data_1 - текущая дата
;$data_2 - дата через 45 дней
;$data_3 - разность дат

$data_1 = _NowCalcDate()
MsgBox(64, "Текущая дата", $data_1)

$data_2 = _DateAdd( "d",45, _NowCalcDate())
MsgBox(64, "Через 45 дней будет такая дата", $data_2)

$data_3 = _DateDiff("d", $data_1, $data_2)

MsgBox(64, "Осталось дней", $data_3)
If $data_3 < 1 Then
	MsgBox(16, "Сообщение", "Срок истек")
	Exit
EndIf