用vbs实现配置静态 IP 地址

将计算机的 IP 地址设置为 192.168.1.141，并将 IP 网关设置为 192.168.1.100。
脚本代码

strComputer = "."  
Set objWMIService = GetObject("winmgmts:\" & strComputer & "rootcimv2")  
Set colNetAdapters = objWMIService.ExecQuery _  
    ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")  
strIPAddress = Array("192.168.1.141")  
strSubnetMask = Array("255.255.255.0")  
strGateway = Array("192.168.1.100")  
strGatewayMetric = Array(1)  
For Each objNetAdapter in colNetAdapters  
    errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)  
    errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)  
    If errEnable = 0 Then  
        WScript.Echo "The IP address has been changed."  
    Else  
        WScript.Echo "The IP address could not be changed."  
    End If  
Next 

用vbs得到计算机的 IP 地址
描述返回安装在计算机中的每个支持IP的网络适配器的IP地址。脚本代码strComputer="."SetobjWMIService=GetObject("winmgmts:\"&strComputer&"rootcimv2")SetIPConfigSet=objWMISer

用vbs实现枚举网络连接的代码
描述检索有关计算机上所有活动网络连接的信息。有关在这段代码中使用的Win32_NetworkConnection类别的更多信息，请单击此处。支持平台WindowsServer2003是Wind

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