powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Shell CMD дождаться завершения
11 сообщений из 11, страница 1 из 1
Shell CMD дождаться завершения
    #37273282
imishe
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте форумчане.
Всё что есть на форуме по этому поводу уже читал. Взятое с форума в 2008 студии работать не хочет.
Необходимо:
1. Запустить CMD (Shell("cmd /c ipconfig /all")
2. Дождаться окончания этого процесса.
Заранее благодарю.
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37273539
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
imishe,
Код: plaintext
1.
2.
3.
4.
5.
Dim sh As Object
Set sh = CreateObject("WScript.Shell")
sh.Run "cmd /c ipconfig /all & pause",  1 , - 1 
MsgBox "good!"
Set sh = Nothing
Объект WshShell
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37273551
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
скукотища,

а разве не так:
sh.Run "cmd /c ipconfig /all" & pause", 1, -1
как из этого:
Синтаксис:

Run(<Command>,<WindowStyle>,<WaitOnReturn>)

Назначение: создаёт новый независимый процесс, который запускает заданное приложение.

Параметры:

<Command> - строка, командная строка запуска приложения.
<WindowStyle> - необязательный, число. Определяет вид окна запускаемого приложения. Некоторые возможные значения:
0 - Не отображает окно.
1 - Активизирует и отображает окно.
2 - Активизирует окно и отображает его в свёрнутом виде.
3 - Активизирует окно и отображает его в максимизированном виде.
<WaitOnReturn> - необязательный, булево (число). True - сценарий возобновит работу только после завершения вызванного процесса. False (по умолчанию) - управление передаётся сразу обратно в сценарий.

можно увидеть и записать так: pause, 1, -1
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37273557
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ципихович Эндрюа разве не так:
Код: plaintext
sh.Run "cmd /c ipconfig /all" & pause",  1 , - 1 
не так

Ципихович Эндрюможно увидеть и записать так:
Код: plaintext
pause,  1 , - 1  
можно. Но ТС надо было ipconfig
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37274035
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
надо просто вывод команды в файл сделать и всё прочитать из файла


Код: plaintext
ipconfig /all >out.txt
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37274273
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
imisheНеобходимо:
1. Запустить CMD (Shell("cmd /c ipconfig /all")
2. Дождаться окончания этого процесса.А может, разумнее получить необходимые данные иными методами (скажем, через WMI) и не использовать костыли?
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37275432
imishe
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо большое всем за ответы. Я не очень понятно сформулировал вопрос за и что прошу прощения.
На месте ipconfig например может быть ping c выводом в файл (как написал Konst_One) и никто не знает как быстро отработает этот пинг. 4-6-8 секунд? Так вот есть ли возможность отследить этот открытый процесс и уже дождавшись его завершения чего то там делать (с тем же выводом в файл). Иначе же файла просто нет, или он занят.
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37275466
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
imisheТак вот есть ли возможность отследить этот открытый процесс и уже дождавшись его завершения чего то там делать (с тем же выводом в файл).Смотри внимательно на последний параметр команды Run.
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37275489
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
imisheТак вот есть ли возможность отследить ...Для консольных приложений 10691103 .
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37275490
OLEG_ZH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
...
Рейтинг: 0 / 0
Shell CMD дождаться завершения
    #37275500
imishe
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
[quot скукотища]imishe,
[src VB]Dim sh As Object
Set sh = CreateObject("WScript.Shell")
sh.Run "cmd /c ipconfig /all & pause", 1, -1
MsgBox "good!"
Set sh = Nothing

Действительно good ))
Спасибо всем еще раз!
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Shell CMD дождаться завершения
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]