script to change nwlink IPX/SPX/Netbios compatible transport protocol 1

[dkwokgs]

Hi There,

I am trying to figure out how to change the "Nwlink IPX/SPX/Netbios compatible transport protocol" frame type to 802.3(from default "Auto") in all the xp (different brand computer) in my network.

Tried to look at WMI scripting but cannot understand cos I not familiar with WMI and VBS. Please advise.


Best Regards
Daniel

 

[CurtisLGray]

Dan,

The is a modified version taken from Microsoft's Script Center... Hope it helps.

Curtis

' Description
'
' Configures the IPX network number and frame type for a network adapter.
' Note that both the network number and the frame types must be passed as arrays, even
' if there is only a single element (For example, one frame type).


On Error Resume Next

Const objEthernet_802_3 = 1 'Value associated with Ethernet 802.3 in WMI
Const NETWORK_NUMBER = 0 ' Change value from 0 to your Network Number

strComputer = "." 'Leave as is for "any" PC or replace the period with the computer name

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNetCard in colNetCards
arrNetworkNumber = Array(NETWORK_NUMBER)
arrFrameTypes = Array(objEthernet_802_3)
objNetCard.SetIPXFrameTypeNetworkPairs arrNetworkNumber, arrFrameTypes
Next