实时检查本机连接到多少WWW站点和会话的脚本

本批处理可以实时检查本机当前连接多少WWW站点和多少会话.
7V1z'c4s Z0本批处理每隔10秒,检查并显示结果.IXPUB技术博客h3x!q1p*qE

+Q't6w"fI6IK0结果如下:IXPUB技术博客TP9Oh0@
D:\>checkip.batIXPUB技术博客8x{ Z+Zid#ZH
当前时间 23:48:32.40
s#nI&}
`"}Cn d0共有3用户连接,共有4会话连接IXPUB技术博客-dW0c0_d7g
IXPUB技术博客\!t]P)v
IXPUB技术博客@Y~E!WL

:pch{_4l{{b'N0@echo offIXPUB技术博客w|k'D9Tu6A"P
cls
h0F!f }m}w0IXPUB技术博客k3W2vu@;vzER
:MBEGIN
O
hB3fj-kA%n0set session_count=0IXPUB技术博客$vl A/s4I
set ip_count=0IXPUB技术博客u'_S+}!|a&O
set lastip=1

z.m'y'X7YghV0IXPUB技术博客LvIu*YZ
if exist temp1.txt del temp1.txt /q IXPUB技术博客m6O#J B*X ] k9|}
if exist temp2.txt del temp2.txt /q
)PxWdi1o[G0if exist temp3.txt del temp3.txt /q
(_ L4^Y8?}0
D^9D4tToc tI&a%t0echo 当前时间 %time%IXPUB技术博客n!LeI ms(tL
netstat -na -p tcp | find ":80 " | sort >temp1.txtIXPUB技术博客 b F#zS9h
if exist temp1.txt (for /F "tokens=3" %%a in (temp1.txt) do (echo %%a >>temp2.txt ))
%l^/ViQ{|&U0if exist temp2.txt (
2H7M
L(iJ8B0sort temp2.txt >temp3.txtIXPUB技术博客6Ir|3`y h.`-Q"nOk
for /F "tokens=1 delims=:" %%a in (temp3.txt) do call :MCOUNT %%aIXPUB技术博客+u^A@(TdT
)
%z9d8k.q(n$iSl0goto MEND
9[pu'Ro Z0IXPUB技术博客*f"of5k*_
:MCOUNT
&gCS.xFM)}[0set tmp=%1IXPUB技术博客i2\fK1D(D'e1D4q [-aM
set /a session_count=%session_count%+1
S&Q%g\C[0if not "%tmp%"=="%lastip%" (
}@H#sD:Z
e1y(| wQ0set /a ip_count=%ip_count%+1IXPUB技术博客,R*Ts0iE}h Q
set lastip=%tmp%
,c#m a)Yr@0)
:~X d-h+D0goto :EOFIXPUB技术博客t2m0r6x n os:?
IXPUB技术博客XtW
Hw9wC
IXPUB技术博客~q&T9cQ[9l V
:MEND
ucZ#w?#M.v/S0echo 当前共连接到%ip_count%站点,共有%session_count%会话连接IXPUB技术博客Zg#S5gk5V*?BTB
sleep 10000
X:G$zQl},M9~5p`0if exist temp1.txt del temp1.txt /q IXPUB技术博客'?7pOW+b)tz5\;^
if exist temp2.txt del temp2.txt /q
5E5n#dCy;w~ g0if exist temp3.txt del temp3.txt /qIXPUB技术博客_R+d!oEm
goto MBEGIN
INf&}6@0t+}(w0
9C3]c%t)O;K0@echo on
L)Sm W?5|Q&lr||0