Как вы думаете, это будет работать:
shell "cmd /c cd c:\1 /c 1.bat /c"
Есть какие-нибудь еще команды на запуск?
RayShade писал(а):shell "cmd /c c:\1.bat"
Sergey_next писал(а):Есть какие-нибудь еще команды на запуск?
Option Explicit
Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, _
ByVal nCmdShow As Long) As Long
Const SW_RESTORE = 9
Private Sub Form_Load()
'Shell "с:\1.bat"
WinExec "с:\1.bat", SW_RESTORE
End Sub
awl100Alex писал(а):RayShade писал(а):shell "cmd /c c:\1.bat"
А зачем "cmd /c..."? Можно и без этого.Sergey_next писал(а):Есть какие-нибудь еще команды на запуск?
- Код: Выделить всё
Option Explicit
Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, _
ByVal nCmdShow As Long) As Long
Const SW_RESTORE = 9
Private Sub Form_Load()
'Shell "с:\1.bat"
WinExec "с:\1.bat", SW_RESTORE
End Sub
Как вариант... Лично мне нравится больше.
Сейчас этот форум просматривают: Yandex-бот и гости: 63