Здравствуйте, DD_SSS, Вы писали:
DD_>Здравствуйте!!!
DD_>Есть небольшая проблема. Пытаюсь запустить приложение на удаленном компе:
DD_>Set proc = GetObject("winmgmts:\\destination\root\cimv2:Win32_Process")
DD_>proc.Create "\\local\share\notepad.exe"
DD_>При этом GetObject("winmgmts:\\destination\root\cimv2:Win32_Process") выдает ошибку: "Cannot create ActiveX component."
DD_>При чем тут ActiveX?
DD_>В чем может быть проблема? Заранее спасибо
Set oRemote = oLocator.ConnectServer(computer, "root\cimv2", user, password)
If (Err.Number <> 0) Then
str_out_err = "Не удалось подключиться" & vbCrLf & _
"Ошибка: " & Err.Description & "Код ошибки: 0x" & Hex(Err.Number) & " (" & Err.Number & ")"
Else
Set oProcess = oRemote.Get("win32_process")
strProcess = command_line
iRet = oProcess.Create(strProcess)
If (iRet <> 0) Then
str_out_err = "Не удалось запустить модуль Код ошибки: " & iRet
Else
str_out_err = "Запуск прошел успешно"
End If
