用VBS設(shè)置靜態(tài)IP和DNS服務(wù)器地址的代碼

2019-10-26 18:03:30

字體：大中小

供稿：網(wǎng)友

核心代碼一：

strIPAddress = Array("192.168.0.148") strSubnetMask = Array("255.255.255.0") strGateway = Array("192.168.0.1") strGatewayMetric = Array(1) arrDNSServers = Array("192.168.0.1","192.168.0.2") strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!//" & strComputer & "/root/cimv2") Set colNetAdapters = objWMIService.ExecQuery _ ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE") For Each objNetAdapter in colNetAdapters errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask) errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric) errDNS = objNetAdapter.SetDNSServerSearchOrder(arrDNSServers) 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

記得把參數(shù)改成自己想要的。

代碼二：

將計算機(jī)的 IP 地址設(shè)置為 192.168.1.111，并將 IP 網(wǎng)關(guān)設(shè)置為 192.168.1.1。

strComputer = "." Set objWMIService = GetObject("winmgmts:/" & strComputer & " ootcimv2") Set colNetAdapters = objWMIService.ExecQuery _ ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE") strIPAddress = Array("192.168.1.111") strSubnetMask = Array("255.255.255.0") strGateway = Array("192.168.1.1") 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

原文：http://demon.tw/programming/vbs-modify-ip-dns-setting.html

您可能感興趣的文章:

linux下bind9安裝配置一例win2003 DNS服務(wù)器配置方法[圖文詳解]win2003服務(wù)器搭建DNS服務(wù)器配置圖解教程(比較詳細(xì))windows2003 DNS服務(wù)器配置(圖文詳解)windows服務(wù)器的DNS服務(wù)器備份與還原步驟小結(jié)Win2003 DNS服務(wù)器創(chuàng)建多個域名Python寫的一個簡單DNS服務(wù)器實(shí)例圖文詳解添加DNS服務(wù)器的操作步驟winmydns DNS服務(wù)器架設(shè)Centos 6.5 下配置DNS服務(wù)器的方法(圖文詳解)C#利用WMI操作DNS服務(wù)器(可遠(yuǎn)程操作,需要相應(yīng)權(quán)限)win2003 使用DNS服務(wù)器實(shí)現(xiàn)負(fù)載均衡DNS服務(wù)器中創(chuàng)建正向查找區(qū)域并在該區(qū)域下創(chuàng)建主機(jī)記錄DNS服務(wù)器支持泛域名解析的設(shè)置方法 [修正版本]從斷網(wǎng)事件分析DNS服務(wù)器拒絕服務(wù)攻擊詳解Liunx下配置DNS服務(wù)器DNS服務(wù)器管理與配置技巧淺談RHE5服務(wù)器管理搭建DNS服務(wù)器步驟說明[圖文]在Windows 7 上安裝DNS服務(wù)器bind9方法詳解

上一篇：vbs字符串操作小考題

下一篇：屏蔽端口的vbs腳本