значение коммандной строки запущенной внешней программы

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
noni
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 16.05.2006 (Вт) 10:46

значение коммандной строки запущенной внешней программы

Сообщение noni » 16.05.2006 (Вт) 10:57

заранее извиняюсь если это глупо

Мне нужно запустить ping и результат пинга вывести на форму.

к примеру :

Private Sub Command1_Click()
shell ("ping 192.168.0.1")
End sub

так не получится эт точно.
Но как сделать?
дайте направление
заранее спасибо!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 16.05.2006 (Вт) 11:03

Нды...

Это может и не глупо само по себе.
Это глупо в свете того количества раз, которое данный вопрос поднимался.
Направление.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

gaidar
System Debugger
System Debugger
 
Сообщения: 3152
Зарегистрирован: 23.12.2001 (Вс) 13:22

Сообщение gaidar » 16.05.2006 (Вт) 11:04

Наипростейший способ, направить вывод в файл:

ping ya.ru > C:\6F7FG8D.txt

И потом считать в программе.
The difficult I’ll do right now. The impossible will take a little while. (c) US engineers in WWII
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali

noni
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 16.05.2006 (Вт) 10:46

Сообщение noni » 16.05.2006 (Вт) 11:06

gaidar писал(а):Наипростейший способ, направить вывод в файл:

ping ya.ru > C:\6F7FG8D.txt

И потом считать в программе.



а вот это глупо !

gaidar
System Debugger
System Debugger
 
Сообщения: 3152
Зарегистрирован: 23.12.2001 (Вс) 13:22

Сообщение gaidar » 16.05.2006 (Вт) 11:13

На самом деле не совсем глупо. Это, главное - просто осуществимо.
The difficult I’ll do right now. The impossible will take a little while. (c) US engineers in WWII
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 16.05.2006 (Вт) 11:16

Ибо сказал Гайдар: это наипростейший способ.


Исходя из реплики noni, можно сделать вывод, что человек обладает достаточными знаниями для отличения наивных способов пинга от профессиональных. Следовательно, поиск ответа на форуме не займёт много времени.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

gaidar
System Debugger
System Debugger
 
Сообщения: 3152
Зарегистрирован: 23.12.2001 (Вс) 13:22

Сообщение gaidar » 16.05.2006 (Вт) 11:17

Забыл добавить, что по-хорошему нужно делать через pipe, т.е. начинать с CreatePipe. Только оно Вам надо?
The difficult I’ll do right now. The impossible will take a little while. (c) US engineers in WWII
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 16.05.2006 (Вт) 11:20

Вообще-то, если просто немного порыться в msdn, то в просто, примерах, есть способ пингования через WMI класс. И его результат можно хоть на форму, хоть куда.

noni
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 16.05.2006 (Вт) 10:46

Сообщение noni » 16.05.2006 (Вт) 11:21

gaidar
ок
это Я знал
но Я хотел более продвинутый способ
вообщето это нужен не для ping а
а для rasdial.exe

Private Sub Command1_Click()
shell ("rasdial vpn user passwd")
End sub

нашел rasapi но как использовать его и
даст ли он мне тот результат ?

gaidar
System Debugger
System Debugger
 
Сообщения: 3152
Зарегистрирован: 23.12.2001 (Вс) 13:22

Сообщение gaidar » 16.05.2006 (Вт) 11:21

Ну, если вообще про консоль говорить, то лучше уж через pipe. Кстати, GSerg, для нашей базы знаний не переведешь, а? http://support.microsoft.com/kb/q173085/
The difficult I’ll do right now. The impossible will take a little while. (c) US engineers in WWII
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali

gaidar
System Debugger
System Debugger
 
Сообщения: 3152
Зарегистрирован: 23.12.2001 (Вс) 13:22

Сообщение gaidar » 16.05.2006 (Вт) 11:23

Кстати, noni, а с каких пор я в русском языке пишется с большой буквы? :) У нас с большой буквы при личном обращении пишется Вы. Здесь Вам не английский :)
The difficult I’ll do right now. The impossible will take a little while. (c) US engineers in WWII
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 16.05.2006 (Вт) 11:29

То ли в этом примере, то ли в другом, не помню, но была ошибка в MSDN. Подстановка хэндлов была не так, как надо.
Код без этой ошибки, а также с корректным дублированием хэндлов, я уже выкладывал. Так что переводить нечего, разве что в поиск.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

noni
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 16.05.2006 (Вт) 10:46

Сообщение noni » 16.05.2006 (Вт) 11:35

Ну, если вообще про консоль говорить, то лучше уж через pipe. Кстати, GSerg, для нашей базы знаний не переведешь, а? http://support.microsoft.com/kb/q173085/


то что нужно
gaidar спасибо[/b]

Twister
Теоретик
Теоретик
Аватара пользователя
 
Сообщения: 2251
Зарегистрирован: 28.06.2005 (Вт) 12:32
Откуда: Алматы

Сообщение Twister » 16.05.2006 (Вт) 13:29

А вот и то, про что говорил GSerg.
А я все практикую лечение травами...

smaharbA
Новичок
Новичок
 
Сообщения: 30
Зарегистрирован: 16.06.2005 (Чт) 5:08

Сообщение smaharbA » 16.05.2006 (Вт) 17:41

А что ком использовать в ВБ это моветон ?
.stdin
.stdout
Я конечно далек от мысли...(с)


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 58

    TopList