HelpF.pro

Как из скрипта VBS запустить 1C, чтобы окно программы не видно было?

Код 1C v 8.х
 WshShell = Новый COMОбъект("WScript.Shell");
WshShell.Run(СтрокаЗапуска, 0, Истина)


Код VBS
 Set WshShell=CreateObject("WScript.Shell")
WshShell.Run """C:\Program Files\1cv81\bin\1cv8.exe"" ENTERPRISE /Sserver\base",0,0


Код VBS
 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

Опубликовано на сайте: https://HelpF.pro
Прямая ссылка: https://HelpF.pro/faq82/view/998.html