Запуск приложения VB6 #188575

Доброе утро, задача проста - есть форма, на ней 2 кнопки. 1 кнопка запускает одно приложение, 2, соответсвенно другое. Как в VB выглядит такая операция. Спасибо :)

также как в 1С...

Да ну? А как в 1С :D ?

Это прикол такой?

Хм, что я, задачу неправильно сформулировал? Надо в Visual Basic запустить по нажатию кнопки приложение, как это сделать?

ShellExecute Апи и тут рулят.

А-а-а, что ж я тупоу такой Private Sub Command1_Click //Что тут писать, что бы запустить "C:Program Files1Cv77in1cv7.exe"???     End Sub

Если еще не забыл, то вроде ExecCmd("...

Нет, я гоню. Меня не слушать.

Поздно, уже послушал :)

+ Я тоже гоню, в С++ я бы поюзал CreateProcess, в ВБ думаю так же.

Не, наверное так тоже неправильно :(

Public Sub ExecuteAndWait(cmdline As String)    Dim NameOfProc As PROCESS_INFORMATION    Dim NameStart As STARTUPINFO    Dim X As Long    NameStart.cb = Len(NameStart)    X = CreateProcessA(0&, cmdline$, 0&, 0&, 1&, NORMAL_PRIORITY_CLASS, 0&, 0&, NameStart, NameOfProc)    X = WaitForSingleObject(NameOfProc.hProcess, INFINITE)    X = CloseHandle(NameOfProc.hProcess) End Sub

Все верно.

Вот такая фигня есть: Может оно?

А я вперед! См.

Ты забыл про Declare Function CreateProcessA

А как завершить эту програмку после того, как кнопка нажата и приложение запущено?

Docmd.Quit

Пишет, что необходим объект :(

А ты убери   X = WaitForSingleObject(NameOfProc.hProcess, INFINITE)   X = CloseHandle(NameOfProc.hProcess) и программа не будет ждать завершения.

Убрал, но нужно, что бы программа после запуска приложения сама закрылась, вот!

ExitProcess

Какой процесс :) Public Sub ExecCmd(cmdline$) Dim proc As PROCESS_INFORMATION Dim start As STARTUPINFO ... End Sub Private Sub Command2_Click    ExecCmd ("C:Program Files1Cv8BIN1cv8.exe") //Что тут написать, что бы закрылась эта программа? End Sub

Private Sub Command2_Click   ExecCmd ("C:Program Files1Cv8BIN1cv8.exe")   ExitProcess End Sub

Что нужно, еще раз скажи, помогу ..

Хотя тут уже столько вариаций было

Sub или Function не определены Нужна команда для приложения, написанного в VB6, которая по нажатию кнопки на форме этого приложения закрывает это приложение. Как будто на крестик нажали :)

через апи решается вроде, щас поищу как - примерчик был на винте вроде..

Вот что бывает, когда люди начинают программировать на ВБ, не разобравшись в основах. Возможно, он просто не видит эту функцию, нужно его ткнуть носом, как и с CreateProcessA

C Declare Function ExitProcess не катит?

Я не начинаю, это первый и последний раз в жизни :) Как и кого ткнуть - то? Неужели завершить программу так сложно?

элементарно

Где - то в задворках памяти - что то было вроде Form1.Unload Или App.Quit

так тебе свою прогу надо завершить что-ли?

Наверняка есть в васике функция, но по нему я не спец. АПИ или еще чего - пожалста.

Читаем сначала :) Нужна команда для приложения, написанного в VB6, которая по нажатию кнопки на форме этого приложения закрывает это приложение. Как будто на крестик нажали :)

Да! :)

End

или Exit

тебе это надо было?

Да, End сработал. Спасибо.