Как можно запустить прогу, не используя функцию Shell, а используя API функцию? - VB

Формулировка задачи:

Привет Всем! Подскажите, как можно запустить прогу, не используя функцию Shell, а используя API функцию. Наверное PostMessage или SendMessage, но я не знаю какие константы использовать.

Решение задачи: «Как можно запустить прогу, не используя функцию Shell, а используя API функцию?»

textual
                            Листинг программы 
                        
Dim retval As Long  ' return value
 
Public Const SW_MAXIMIZE = 3
Public Const SW_MINIMIZE = 6
Public Const SW_RESTORE = 9
 
Public Declare Function ShellExecute Lib 'shell32.dll' Alias 'ShellExecuteA' (ByVal hwnd As Long, _
    ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal _
    lpDirectory As String, ByVal nShowCmd As Long) As Long
 
retval = ShellExecute(Form1.hWnd, 'open', 'C:MyProgstartup.exe', '-fast', 'C:MyProg ', SW_MAXIMIZE)

Оцени полезность:

5 голосов , оценка 3.8 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы