IP地址切换,把DNS设置为动态获取。 VBS转换为AU3
以下一段VBS代码可以正常运行strComputer = "."
Set objWMIService = GetObject(_
"winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration " _
& "where IPEnabled=TRUE")
For Each objNetAdapter In colNetAdapters
errEnable = objNetAdapter.EnableDHCP()
errDNS = objNetAdapter.SetDNSServerSearchOrder(null)
Next
但是转换为AU3时,对应语句objNetAdapter.SetDNSServerSearchOrder(null)中的Null不知用什么方式处理,尝试“”与0都不生效,请大家给些建议。
谢谢 这个确实。我在AU3里也碰到,不知道如何解决。
问题应该出在两个DNS不能有空的。
另,楼主可以参考下这个,不知道楼主用不用下面的方法:本地连接固定ip:
netsh interface ip set address name="本地连接" source=static addr=192.168.1.100 mask=255.255.255.0 gateway=192.168.1.1 1
netsh interface ip set dns name="本地连接" source=static addr=202.102.128.68
netsh interface ip add dns name="本地连接" 202.102.134.68 index=2
;自动获取ip与dns
netsh interface ip set address name="本地连接" source=dhcp
netsh interface ip set dns name="本地连接" source=dhcp 回复 1# jsd
我如果没记错的话, AU3 3.3.9.4 版 才有 null 关键字! 尝试下用新版的AU3? 最新版本的已经支持null 非常感谢,刚刚下载了最新的beta版,的确支持NULL,已编译成功。 3.3.7无语了 用不鸟也不想换了 不 懂 VBS. 我记得论坛有这转换脚本
页:
[1]