ip更改设置（纯新手弄的，很小白，求别见笑，求指教）

ak47gglllk · 发表于 2013-12-25 13:00:43

$gip = InputBox("更改ip地址", "请输入ip地址")
$IP = $gip
$gzwym = InputBox("更改的子网", "请输入子网地址，不建议修改")
$zwym = $gzwym
$gwg = InputBox("更改网关", "请输入网关")
$wg = $gwg
$gdns = InputBox("更改dns服务器", "请输入dns地址")
$dns = $gdns
$bak_dns = ""      
;修改IP,dns,路由
RunWait('netsh interface ip set address name = "本地连接"  source = static addr = ' & $IP & ' mask = ' & $zwym & ' gateway = ' & $wg & ' gwmetric = 0', "c:\windows\system32", @SW_HIDE)
RunWait('netsh interface ip set dns name = "本地连接"  source = static addr = ' & $dns & ' register = PRIMARY', "c:\windows\system32", @SW_HIDE)
RunWait('netsh interface ip add dns name = "本地连接"  addr = ' & $bak_dns & ' index=2', "c:\windows\system32", @SW_HIDE)

求指教，非常感谢。

zhongzijie · 发表于 2013-12-25 13:15:26

还不错，可以改．

menfan1 · 发表于 2013-12-25 15:23:13

最方便的就是netsh哈

joyran · 发表于 2013-12-25 16:11:22

楼主加油！！！！

lpxx · 发表于 2013-12-25 20:11:46

万一有多网卡或者多个连接怎么办？

ak47gglllk · 发表于 2013-12-26 09:06:04

回复 5# lpxx

非常感谢哥哥提醒，我现在就想办法去

mn3711698 · 发表于 2014-2-11 11:12:52

支持这样的开源，不错。要是再加张图片就好了。

coolpanda · 发表于 2014-2-11 13:53:01

非常感谢谢~~~~~~~~~~~~~~~~~~

nqawen · 发表于 2014-8-6 09:08:41

楼主不错，，简单明了，，向你学习了

gplane · 发表于 2014-8-27 15:33:07

这货不能用于NT6系统的IP设置。

lhl5186381 · 发表于 2015-8-15 00:01:23

回复 1# ak47gglllk

		自动登录	找回密码
密码			加入

[原创] ip更改设置（纯新手弄的，很小白，求别见笑，求指教）