找回密码
 加入
搜索
查看: 5417|回复: 8

[网络通信] IP地址切换,把DNS设置为动态获取。 VBS转换为AU3

  [复制链接]
发表于 2012-6-11 07:53:00 | 显示全部楼层 |阅读模式
以下一段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都不生效,请大家给些建议。

谢谢
发表于 2012-6-11 08:48:25 | 显示全部楼层
这个确实。我在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
发表于 2012-6-11 15:50:01 | 显示全部楼层
回复 1# jsd
我如果没记错的话, AU3 3.3.9.4 版 才有 null 关键字! 尝试下用新版的AU3?
发表于 2012-6-11 16:25:57 | 显示全部楼层
最新版本的已经支持null
 楼主| 发表于 2012-6-11 23:41:28 | 显示全部楼层
非常感谢,刚刚下载了最新的beta版,的确支持NULL,已编译成功。
发表于 2012-7-1 18:32:46 | 显示全部楼层
3.3.7无语了 用不鸟也不想换了
发表于 2012-7-2 06:50:13 | 显示全部楼层
不 懂 VBS.
发表于 2012-7-3 08:43:53 | 显示全部楼层
我记得论坛有这转换脚本
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-15 06:58 , Processed in 0.072381 second(s), 22 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表