Ожидание исполнения батника
Извините, если было уже, но искать времени нет.
Как в VB сделать так:
я запускаю батник из VB и мне надо подождатьЮ пока он выполнится.
Как это сделать?
Заранее спасибо.
Всем здравствуйте!
Извините, если было уже, но искать времени нет.
Как в VB сделать так:
я запускаю батник из VB и мне надо подождатьЮ пока он выполнится.
Как это сделать?
Заранее спасибо.
Честно говоря, не могу пока себе представить способ более элегантный, чем тупо после запуска батника, проверять через Win API запущено ли приложение или уже нет. Тут я понимаю все зависит еще от того как он у тебя работает, закрывает ли сам за собой окно...
Честно говоря, не могу пока себе представить способ более элегантный, чем тупо после запуска батника, проверять через Win API запущено ли приложение или уже нет. Тут я понимаю все зависит еще от того как он у тебя работает, закрывает ли сам за собой окно...
Когда оно закончилось, но не закрылось, в имени окна появляется надпсь типа "Сеанс завершен". Может, пользоваться этим?
Когда оно закончилось, но не закрылось, в имени окна появляется надпсь типа "Сеанс завершен". Может, пользоваться этим?
Тоже думаю об этом, но конкретнее надо, что бы сам автор пояснил как у него будет работать его батник
Забыли написать, что для ожидания можно использовать функцию такого типа:
Private Sub Looper()
dim blBreakTrue as Boolean
' для создания цикла ожидания
Do While blBreakTrue
if (проверка окончания работы прог.) then blBreakTrue =True
Call loops
DoEvents
Loop
End Sub
Private Function loops()
End Function
Через API функции все работает...