Здравствуйте!!!

Есть небольшая проблема. Пытаюсь запустить приложение на удаленном компе:

Set proc = GetObject("winmgmts:\\destination\root\cimv2:Win32_Process")
proc.Create "\\local\share\notepad.exe"

При этом GetObject("winmgmts:\\destination\root\cimv2:Win32_Process") выдает ошибку: "Cannot create ActiveX component."
При чем тут ActiveX?
В чем может быть проблема? Заранее спасибо

Здравствуйте, 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

Здравствуйте, CyrilUSSR, Вы писали:

забыл

   Set oLocator = CreateObject("WbemScripting.SWbemLocator")