[Mescaline]

нагуглил такой код, не заработал.

Код:

sProcessName = "process.exe"

sComputer = "."    ' use "." for local computer
Set oWmi = GetObject("winmgmts:" _
   & "{impersonationLevel=impersonate}!\\" & sComputer & "\root\cimv2")

Set oShell = CreateObject("WScript.Shell")

' go into eternal loop
Do
  Set colProcessList = oWmi.ExecQuery _
      ("Select * from Win32_Process Where Name = '" & sProcessName & "'")

  If colProcessList.Count = 0 Then
    ' process is not running

    ' do the CLFYtest here

    If remote server is up Then
      oShell.Run "C:\name.exe", 1, False
    End If
  End If

  WScript.Sleep 5 * 60 * 1000 ' wait 5 minutes before trying again
Loop

где ошибка ?

[Iska]

такое возможно реализовать, без стороннего софта? »

Возможно. Почему каждые 30 минут, и какой именно процесс?

[Mescaline]

Почему каждые 30 минут »

можно и 40, суть не в этом. (консольная программа часто вылетает, нужно восстанавливать процесс).

какой именно процесс? »

в деспетчере задач

[Iska]

Перефразирую: процесс, который проверяем, и процесс, который запускаем — это одно и то же приложение?

[Mescaline]

Iska, спасибо за попытку помочь. решение найдено. не актуально.