| Вопрос: Запустить приложение на удал. компе | Добавлено: 03.08.07 11:06 |
Автор вопроса:  gosha
|
|
Люди, кто знает ВБА, объясните, че делаю не так?
Пишу Const SW_NORMAL = 1 strComputer = "имя_другого_копма или ." strCommand = "Notepad.exe" Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" _ & strComputer & "\root\cimv2") ' Configure the Notepad process to show a window Set objStartup = objWMIService.Get("Win32_ProcessStartup") Set objConfig = objStartup.SpawnInstance_ objConfig.ShowWindow = SW_NORMAL ' Create Notepad process Set objProcess = objWMIService.Get("Win32_Process") intReturn = objProcess.Create _ (strCommand, Null, objConfig, intProcessID) If intReturn <> 0 Then Wscript.Echo "Process could not be created." & _ vbNewLine & "Command line: " & strCommand & _ vbNewLine & "Return value: " & intReturn Else Wscript.Echo "Process created." & _ vbNewLine & "Command line: " & strCommand & _ vbNewLine & "Process ID: " & intProcessID End If Если strComputer = ".", то на локальной машине все запускается как надо, а если прописать виндоус-имя другого компа, то скрипт говорит, что удачно запустил, и в процессах на том компе notepad.exe появляется, а на экране его нет, то есть окно с блокнотом не появляется. Почему??? Где я ступил? Объясните, умные люди? |
| Ответы | Всего ответов: 0 |
Страница: