- 在线时间
- 0 小时
- 最后登录
- 2007-9-23
- 注册时间
- 2004-9-10
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 9975 点
- 威望
- 7 点
- 阅读权限
- 150
- 积分
- 4048
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1893
- 主题
- 823
- 精华
- 2
- 分享
- 0
- 好友
- 0

我的地盘我做主
该用户从未签到
 |
< >作者:zzzevazzz 来自:http://www.ph4nt0m.org</P>. h5 V% C- ~$ T: o% }8 A
< >XP和2003下的netstat有-o选项,所以可以容易地实现fport。
3 ~- ?9 B* V; E% S/ Q5 J1 F7 j7 w$ r+ R$ i8 r
vbs脚本版:! R+ s% T L# z3 D$ m
Codz: ( _, H9 ]# N6 p% _7 _! `$ d1 u: B7 e y7 K
' O% L) S+ s9 h1 g
with new regexp
2 H5 ^2 z% J/ F& ^8 D1 p .pattern="(..Ps+S+s+S+s+[A-Z]*)s*([0-9]+)" . v3 V; F2 \" ^6 E$ ]
.global=true 9 i/ C9 z7 U7 M$ }1 c" c
set ms=.execute(createobject("wscript.shell").exec("netstat -ano").stdout.readall) * V- m1 o- F* {
end with
7 F3 E @3 y, F. X% Nfor each ps in getobject("winmgmts:\.\rootcimv2:win32_process").instances_
3 i& {+ T u3 k! k; o$ {+ \0 A7 w f=0
. g2 O% f" T6 y& w4 { for each m in ms
" h8 A6 }5 t1 j' ^) C# ^ if m.submatches(1)=ps.handle then 3 k8 C$ p# K4 s, ?% `* e5 M/ F8 ^
if f=0 then f=1:wscript.echo ">"&ps.handle&vbtab&ps.name&vbtab&ps.executablepath
0 n* X2 V6 h+ y# x3 z wscript.echo " "&m.submatches(0)
3 Y6 ^. }! c. `) d6 ?. z end if : C: V3 ~5 K& Y' T" {9 ?, W
next 9 {. q4 h- O3 J/ c' e6 S$ s0 M! e5 ~
next
# u6 a q1 g5 ^/ Q$ P
/ c, B8 |% ]$ R, s( X0 }& D
+ a: D+ a! A" Q照例给出echo版,方便在远程shell中使用。
* q% }3 Q3 _% S$ h _2 ^@echo with new regexp:.pattern="(..P\s+\S+\s+\S+\s+[A-Z]*)\s*([0-9]+)":.global=true>fp.vbs8 [* @- U+ p; s$ q. |! a0 o
@echo set ms=.execute(createobject("wscript.shell").exec("netstat -ano").stdout.readall)>>fp.vbs- J u3 t, A7 W
@echo end with:for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_>>fp.vbs: |6 {. G, c* ?" V* E* K1 |
@echo f=0:for each m in ms:if m.submatches(1)=ps.handle then _>>fp.vbs
8 g% C% f; p( _' V9 N* T@echo if f=0 then f=1:wscript.echo ">"^&ps.handle^&vbtab^&ps.name^&vbtab^&ps.executablepath:end if:_>>fp.vbs
9 ]1 T; k; `, t# Q0 h@echo wscript.echo " "^&m.submatches(0):end if:next:next>>fp.vbs: v& K% w }1 X$ l! B
@cscript //nologo fp.vbs&del fp.vbs</P> |
zan
|