[Iska]

Коллеги, да не надо ничего проверять. Надо запускать процесс из самого пакетного файла/скрипта с ожиданием завершения.

Наподобие (на WSH):

Скрытый текст

Код:

Option Explicit

With WScript.CreateObject("WScript.Shell")
	Do
		' "E:\Program Files (x86)\POST\Sefmail\sefmail.exe"
		.Run "c:\windows\system32\notepad.exe", 1, True
		
		With WScript.CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\Мои проекты\0344\log.txt", 8, True)
			.WriteLine Now() & vbTab & "сообщение о недоступности"
			.Close
		End With
	Loop
End With

WScript.Quit 0

Уже ж было такое недавно.