批处理如何更改系统网关（已解决）

qq3475534

求助，批处理如何自动更改系统win7 和win10网关，网卡名字并非一定是本地连接，也有可能是其他名字，


后面网上也找到了一段VBS代码也可以 代码如下

无视系统里面几个网卡，活动网卡，直接更改，也感谢论坛另外的两位朋友帮助。

1. Const T_GATEWAY = "192.168.0.254" '网关
   
2. Const T_NEWDNS1 = "202.96.128.166" 'DNS1
   
3. Const T_NEWDNS2 = "8.8.8.8" 'DNS2
   
4. strWinMgmt="winmgmts:{impersonationLevel=impersonate}"
   
5. Set NICS = GetObject( strWinMgmt ).InstancesOf("Win32_NetworkAdapterConfiguration")
   
6. For Each NIC In NICS
   
7.        If NIC.IPEnabled Then
   
8.               NIC.SetDNSServerSearchOrder Array(T_NEWDNS1,T_NEWDNS2)
   
9. '              NIC.SetDNSServerSearchOrder Array(T_NEWDNS1)
   
10.               NIC.SetGateways Array(T_GATEWAY)
    
11.        End If
    
12. Next
    

复制代码

czjt1234

如果只有一个网卡

1. rem 另存为 ANSI 编码 bat
   
2. ' & cls & cscript.exe /nologo /e:vbscript "%~f0" %* & pause & exit /b
   
3. 
   
4. DefaultIPGateway = Array("192.168.0.254")    '网关
   
5. 
   
6. Set oWMI = GetObject("Winmgmts:\\.\Root\CIMV2")
   
7. s = "SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True"
   
8. For Each i In oWMI.ExecQuery(s)
   
9.     i.SetGateways DefaultIPGateway
   
10. Next

复制代码

flashercs

1. @echo off
   
2. for /f "tokens=5-6" %%A in ('netsh int ipv4 show route ^|findstr /lc:" 0.0.0.0/0 "') do (
   
3.   netsh int ipv4 set route 0.0.0.0/0 %%A 172.23.112.1
   
4. )
   
5. pause

复制代码

qq3475534

回复 3# flashercs


    提示找不到元素

qq3475534

回复 2# czjt1234


    非常完美 ，感谢。