VPF::Перезапуск процесса - Форум программистов

DENSHER

Дата 28.11.2010, 16:40 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 179
Регистрация: 3.3.2010

Репутация: нет
Всего: нет

Доброго времени суток народ!

Хотел бы узнать как сделать следующие:

Я хочу чтобы после запуска процесса (сторонний процесс) - код ниже

Код


p.StartInfo.FileName = "myproject.exe"
p.StartInfo.Arguments = " -console"
p.StartInfo.WindowStyle = ProcessWindowStyle.Minimized
p.Start()

шла проверка через таймер - жив процесс или нет. Если вдруг процесс падает то, процесс myproject.exe запускается снова.
Если не сложно, то можно пример.
Заранее благодарю за помощь.

Нашел решение своего вопроса - помог добрый человек.

Решение:

Код


      Public Class Form1
          ' Срабатывает по клику на форме
          Private Sub Form1_Click(ByVal sender As System.Object, _ 
          ByVal e As System.EventArgs) Handles MyBase.Click
              ' Создаём процесс
              ' Если не указать EnableRaisingEvents = True,
              ' то события генерироваться не будут.
              Dim prc As New Process With
                        {.StartInfo = New ProcessStartInfo("calc.exe"),
                         .EnableRaisingEvents = True}

              ' Вешаем обработчик на событие .Exited
              AddHandler prc.Exited, AddressOf Process_Exited

              ' Запускаем процесс
              prc.Start()
          End Sub

          ' Обработчик выстреливает, когда процесс завершается
          ' по любой причине. Код выхода иногда подсказывает, что произошло.
          Sub Process_Exited(ByVal sender As Object, ByVal e As EventArgs)
              ' В sender имеем ссылку на наш процесс
              ' Сейчас он у нас один, но может быть много
              ' с одним на всех обработчиком, поэтому полезно:
              Dim prc As Process = DirectCast(sender, Process)
              ' Обычно код выхода 0, когда происходит нормальное завершение.
              ' Если зайти в Task Manager и прибить calc.exe, то код выхода будет 1
              MsgBox(String.Format("Процесс завершился с кодом выхода {0}", prc.ExitCode))
          End Sub
      End Class

Это сообщение отредактировал(а) DENSHER - 3.12.2010, 06:59

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB .NET \| Следующая тема »