WshShell = Новый COMОбъект("WScript.Shell"); WshShell.Run(СтрокаЗапуска, 0, Истина)
Set WshShell=CreateObject("WScript.Shell") WshShell.Run """C:\Program Files\1cv81\bin\1cv8.exe"" ENTERPRISE /Sserver\base",0,0
On Error Resume Next Set objClass = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\CIMV2:Win32_Process") 'WScript.Echo "Запускаем" Res = objClass.Create("C:\Program Files\1CV8PDA\1Cv8pSRV.exe ""Параметры""", Null, Null, PID) If Res <> 0 Then WScript.Echo "Код ошибки: " & Res WScript.Quit End If