Имя пользователя:
Пароль:
 | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - JS Скрипт, получения TCP соединений (по типу netstat -a -n -p TCP), не работает.

Ответить
Настройки темы
VBS/WSH/JS - JS Скрипт, получения TCP соединений (по типу netstat -a -n -p TCP), не работает.

Пользователь


Сообщения: 86
Благодарности: 2

Профиль | Отправить PM | Цитировать


Скрипт следующий:

Скрытый текст
PHP код: Выделить весь код

var WshShell = new ActiveXObject("WScript.Shell");
var 
oExec    WshShell.Exec('%comspec% /c netstat -a -n -p TCP');

function 
ReadAllFromAny(oExec)
{
     if (!
oExec.StdOut.AtEndOfStream)
          return 
oExec.StdOut.Read(1);
     
     return -
1;
}

var 
allInput "";
var 
tryCount 0;
var 
c_est=0;
var 
c_tim=0;
var 
c_lis=0;


while (
true)
{
     
     
     var 
input ReadAllFromAny(oExec);
     
     if (-
== input)
     {
          if (
tryCount++ > 10 && oExec.Status == 1)
               break;
          
WScript.Sleep(100);
     }
     else
     {
          
allInput += input;
          
          
            if (
input=="\n")
            {
            
WScript.Echo(allInput);
            
WScript.Echo("\n");
          
            if (
allInput.search("ESTABLISHED") >) {
                
c_est+=1
                
            
} else if (allInput.search("TIME_WAIT") >0) {    
                
c_tim+=1
            
} else if (allInput.search("LISTENING") >0) {    
                
c_lis+=1

            
}
            
            
              
allInput=""    
            
          
}
          
tryCount 0;
     }
}

WScript.Echo ("ESTABLISHED - " c_est);
WScript.Echo ("TIME_WAIT - " c_tim);
WScript.Echo ("LISTENING - " c_lis); 




На windows 7 все работает, на 2008 R2 уходит в безконечный цыкл сыпит пустыми окнами CMD.
А вторая беда в том что скрипт должен запускать софт, а он работает на движке Rhino, и возможно с этим связано что он в упор не видит ActiveXObject

Как можно обойти эти проблемы?

P.S. Идеальным было бы получить через запрос WMI, но я немогу найти решения. Вроде как было что то но в Windows XP. Это действительно так и метода нет?

Спасибо

Отправлено: 18:17, 02-02-2015

 


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - JS Скрипт, получения TCP соединений (по типу netstat -a -n -p TCP), не работает.

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Интернет - Лимит незавершенных TCP соединений Blast Microsoft Windows Vista 16 18-11-2012 19:12
Разное - не работает сеть по протоколу TCP/IP akalibr Microsoft Windows 2000/XP 4 27-06-2011 23:05
Интерфейс - Не работает диалоговое окно при смене настроек TCP\IP Ar4ers Microsoft Windows 7 0 03-03-2010 22:07
Прочее - Ограничение TCP/IP соединений для сеанса под XP SP2 WChek Сетевые технологии 4 09-12-2007 18:01
win2003r2 таймаут всех соединений при активности tcp/139 dmvy Microsoft Windows NT/2000/2003 4 12-11-2006 22:53




 
Переход