当前位置: 移动技术网 > IT编程>脚本编程>VBScript > 用vbs实现枚举网络连接的代码

用vbs实现枚举网络连接的代码

2017年12月12日  | 移动技术网IT编程  | 我要评论

描述

检索有关计算机上所有活动网络连接的信息。

有关在这段代码中使用的 win32_networkconnection 类别的更多信息,请单击 。

支持平台

windows server 2003

windows xp

windows 2000

windows nt 4.0

yes, with wmi installed


脚本代码
复制代码 代码如下:

on error resume next 
strcomputer = "." 
set objwmiservice = getobject("winmgmts:\\" & strcomputer & "\root\cimv2") 
set colitems = objwmiservice.execquery("select * from win32_networkconnection") 
for each objitem in colitems 
    wscript.echo "access mask: " & objitem.accessmask 
    wscript.echo "caption: " & objitem.caption 
    wscript.echo "connection state: " & objitem.connectionstate 
    wscript.echo "connection type: " & objitem.connectiontype 
    wscript.echo "description: " & objitem.description 
    wscript.echo "display type: " & objitem.displaytype 
    wscript.echo "local name: " & objitem.localname 
    wscript.echo "name: " & objitem.name 
    wscript.echo "persistent: " & objitem.persistent 
    wscript.echo "provider name: " & objitem.providername 
    wscript.echo "remote name: " & objitem.remotename 
    wscript.echo "remote path: " & objitem.remotepath 
    wscript.echo "resource type: " & objitem.resourcetype 
    wscript.echo "user name: " & objitem.username 
    wscript.echo 
next 

如对本文有疑问, 点击进行留言回复!!

相关文章:

验证码:
移动技术网