[Iska]

WSH:

Код:

Option Explicit

Dim dtConditionDate
Dim strPath


dtConditionDate = CDate("01.01.2015 15:00")
strPath = "1.exe"

If Now() >= dtConditionDate Then
	If WScript.CreateObject("Scripting.FileSystemObject").FileExists(strPath) Then
		WScript.CreateObject("WScript.Shell").Run """" & strPath & """"
	Else
		WScript.Echo "File [" & strPath & "] not found."
		WScript.Quit 1
	End If
End If

WScript.Quit 0