Есть такая задача, поочередно зайти на полторы сотни компов, на каждом выполнить команду "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
Может кто что подскажет?
Спасибо