windows下一键修改IP地址

笔记本经常带着家里和办公室两头跑，每次需要修改IP地址。有没有方便的办法修改呢？

我同事用lisp写了个脚本，如下：

(when (setq ip (main-args 2))
(println ip)
(process (format "netsh interface ip set address \"本地连接\" static 192.168.11.%s 255.255.255.0 192.168.11.1 1" ip)))
(process "route add 192.168.29.0 mask 255.255.255.0 192.168.11.60")
(process "route add 192.168.12.0 mask 255.255.255.0 192.168.11.60")
(process "route -p add 10.1.1.11 mask 255.255.255.255 192.168.11.254")
;;(process "net use z: \\192.168.0.2\root")
(println "done")
(exit)

改改可以修改为一个setip_office.bat文件，如下：

netsh interface ip set address \"本地连接\" static 192.168.11.123 255.255.255.0 192.168.11.1 1
route add -p 192.168.12.0 mask 255.255.255.0 192.168.11.60

写两个这样的文件放在桌面，在公司执行公司的，在家执行家里的。