由於辦公室網路需要固定IP和DNS才能上網， 在連線公共網路或者家裡又需要自動獲取IP和DNS才能上網。

頻繁手動切換很麻煩，就搞了兩個指令碼一鍵設定。

1.新建文字檔案, 命名為固定IP.bat

複製指令碼

@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=
@echo //  【固定設定】
@echo //  設定IP，子網掩碼，閘道器
@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=

%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
cd /d "%~dp0"

netsh interface ip set address name="WLAN" source=static addr=192.168.0.230 mask=255.255.255.0 gateway=192.168.0.1 

@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=
@echo //  設定DNS
@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=
netsh interface ip set dns "WLAN" static 114.114.114.114 primary 
netsh interface ip add dns "WLAN" 8.8.8.8 
@echo //  固定IP設定完成！
@pause
 

2.新建文字檔案, 命名為自動IP.bat

複製指令碼

@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=
@echo //  【自動獲取】
@echo //  設定IP，子網掩碼，閘道器
@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=

%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
cd /d "%~dp0"


netsh interface ip set address name="WLAN" source=dhcp 

@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=
@echo //  設定DNS
@echo //-=-=-=-=-=-=-=-=-=-=-=-=-=-=
netsh interface ip set dns name = "WLAN" static addr = none   
@echo //  自動獲取IP設定完成！
@pause
 

備註： name="WLAN" -> 這裡是寫自己網路的名字，根據這個名字來設定的(Win7預設叫無線網路連線)

addr=192.168.1.72 mask=255.255.255.0 gateway=192.168.1.1 -> 需要設定的 IP，子網掩碼，閘道器