濮阳杆衣贸易有限公司

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

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

熱門標(biāo)簽:辦理膠州400電話財(cái)稅 外呼營銷下單系統(tǒng) 陜西高頻外呼回?fù)芟到y(tǒng)哪家好 加盟電銷機(jī)器人好的品牌 海外美發(fā)店地圖標(biāo)注 打電話的外呼系統(tǒng)貴不貴 新密防封卡外呼系統(tǒng)違法嗎 百度地圖標(biāo)注怎么卸載 前鋒辦理400電話申請

核心代碼一:

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ì)算機(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方法詳解

標(biāo)簽:梅州 河南 伊春 四平 武威 咸陽 阜陽 牡丹江

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《用VBS設(shè)置靜態(tài)IP和DNS服務(wù)器地址的代碼》,本文關(guān)鍵詞  用,VBS,設(shè)置,靜態(tài),和,DNS,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《用VBS設(shè)置靜態(tài)IP和DNS服務(wù)器地址的代碼》相關(guān)的同類信息!
  • 本頁收集關(guān)于用VBS設(shè)置靜態(tài)IP和DNS服務(wù)器地址的代碼的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    五常市| 卢湾区| 桂东县| 潜江市| 兴和县| 洞头县| 浦东新区| 喀喇沁旗| 太和县| 泰和县| 綦江县| 常熟市| 安顺市| 永济市| 宁海县| 张北县| 东丽区| 札达县| 朔州市| 齐河县| 铅山县| 潜江市| 楚雄市| 正镶白旗| 东乡县| 高陵县| 勐海县| 济阳县| 松溪县| 贵州省| 琼结县| 彭山县| 阿瓦提县| 七台河市| 兖州市| 吴川市| 太康县| 柯坪县| 宿迁市| 东至县| 乌什县|