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

描述

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

有关在这段代码中使用的 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 & "rootcimv2")  
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 

IIS管理脚本之adsutil.vbs的使用说明
Adsutil.vbs是什么？它是Windows2003的IIS服务自带的基于命令行下的IIS管理脚本，位于%SystemDrive%InetpubAdminScripts目录下，95，426字节。这么大的脚本一看就知

用VBS修改IIS Metabase的代码
//////////////////////////作者：Jaron,江都资讯网邮件：jaron@jdinfo.net网址：http://www.jiangdu.net如果您要转载该文章，请注明出处。//////////////////////////本文解释

tel.xls.vbs xls专杀工具
1、双击运行tel.xls.vbs即可消灭Trojan.Win32.Patched.v病毒。2、本专杀使用VBS脚本编写，执行效率高，不过缺乏智能性，我也不愿去添加那些IF判断语句来进行