Как можно запустить прогу, не используя функцию 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)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д