1 Тема от Домовой

  • Домовой
  • Участник
  • Неактивен

Тема: VBS: Выполнить команду на удаленном компе и проанализировать результат

Доброго Всем времени суток!
Есть такая задача, поочередно зайти на полторы сотни компов, на каждом выполнить команду "telnet xxx.xx.xx.xx yyyy" и посмотреть результат, пройдёт подключение или отобьется? Вручную делать, естественно, не хочется.
Компы не в домене, поэтому надо указывать логин/пароль для подключения. Предполагаю, что нужно вот так:

Set objLocator = CreateObject  ("WbemScripting.SWbemLocator")
Set objService = objLocator.ConnectServer ("computer1", "Root\CIMV2", "admin", "тридвараз")

А вот дальше как-то я теряюсь
думал вот так

Set oWbemObj = objService.Get("Win32_Process")
oWbemObj.create ("telnet xxx.xx.xx.xx yyyy")
MsgBox "подключился!"

Но проходит в любом случае, даже когда указываю несуществующий IP

Может кто что подскажет?
Спасибо

Я - фольклорный элемент!

2 Ответ от Евген

  • Евген
  • Разработчик
  • Неактивен

Re: VBS: Выполнить команду на удаленном компе и проанализировать результат

Чтобы долго не заморачиваться и не курить много мануалов, проще глянь в сторону psexec.exe
ИМХО, самый простой ,быстрый  и надёжный выход...

Времени не хватает... :-(