系统是win7 64位系统,在我电脑上运行以后能够关闭netbois功能,在其它电脑上却不能够实现关闭netbois功能。
是什么原因呢?感谢!
代码如下:
Dim strComputer
Dim objWMIService
Dim colNetCards
Dim objNetCard
strComputer="."
Set objWMIService=GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards=objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNetCard in colNetCards
objNetCard.SetTCPIPNetBIOS(2)
Next