从别人那引用的,不知道是什么意思?高手解释一下

lin6163

我想要的无非就是要通过AU3改网卡的DNS但不要通过netsh和注册表这些外部程序
而且最重要的一点就是要兼容多网卡

谢谢!!!

下面从别人那引用的,不知道是什么意思?
怎么改网卡的DNS那么费劲

set_IP("202.103.224.68","221.7.128.68")                              ;set_IP是什么,好像不是一条代码,但为什么运行后没有出错
Func set_IP($myDns1,$myDns2)                                          ;不懂 什么是set_IP                              
        Dim $colItems                                                ;不懂
        Dim $setdns[2]                                               ;不懂
        $setdns[0]=$myDns1                                             ;不懂                                          
        $setdns[1]=$myDns2                                           ;不懂
        $wbemFlagReturnImmediately = 0x10                             ;不懂,0x10  是什么意思
        $wbemFlagForwardOnly = 0x20                                    ;不懂0x20   是什么意思
        $strComputer = "."                                             ;不懂
        $objWMIService = ObjGet("winmgmts:\" & $strComputer & "\root\CIMV2")
                ;这条看了很晕 但知道一点就是 ObjGet("winmgmts:\\.\root\CIMV2"),结果应该是这样对不?
        ;;修改IP信息
        $colItems = $objWMIService.ExecQuery ("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE MACAddress <> '00:00:00:00:00:00' AND IPEnabled = TRUE", "WQL", _
                                $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
                                                                
                                                                ;这条不用说了,完全看不出什么
        If IsObj($colItems) Then                                      ;IsObj是什么?帮助文档里没有
                For $objNetAdapter In $colItems                       ;$objNetAdapter In $colItems   是什么意思
                        $objNetAdapter.SetDNSServerSearchOrder ($SetDns)   ;这句也看不出什么
                Next
        EndIf
EndFunc

aaeeff

这是通过WMI实现的，查AU3帮助自然查不到了，你在论坛搜索一下吧。

lin6163

WMI 怎么怎么个用法