Hi
Very Simple solution,
http://www.ezlan.net/metrics.html
Jack (MS, MVP-Networking)
"simmondp" <> wrote in message
news:E32E3786-5B76-463A-B255-...
> Cup and pate this into a file called SetLOM.VBS and run, you can make it
> silent by commenting the appropraite lines - works on XP never tried it on
> Vista
>
> ================ cut here ===================
> ' SetLOM.VBS
> '
> ' Enumerate all Wireless Adaptors and set LOM = 1
> ' to ensure wired connection disables wireless
> '
> ' Version 2.0 Proof of concept - Paul Simmonds 12 Sept 2006
> '************************************************* *********
> ' 2.0 - Correctly detect a Wireless from it's media type
>
> ' Set computer to work on, . is local
> strComputer = "."
> ' CONST use for StdRegProv class
> const HKEY_LOCAL_MACHINE = &H80000002
>
> ' Create a Shell object to run the netsh command in
> Set objShell = CreateObject("Wscript.Shell")
>
> ' Get a copy of a reg info for Network Connections
> Set objReg=GetObject("winmgmts:{impersonationLevel=imp ersonate}!\\"&
> strComputer & "\root\default:StdRegProv")
> strKeyPath1 =
> "SYSTEM\CurrentControlSet\Control\Class\{4D36E 972-E325-11CE-BFC1-08002BE10318}"
> strKeyPath2 =
> "SYSTEM\CurrentControlSet\Control\Network\{4D36E97 2-E325-11CE-BFC1-08002BE10318}"
>
> ' Enumerate the Keys, getting a reference to all subkeys
> objReg.EnumKey HKEY_LOCAL_MACHINE, strKeyPath1, arrSubKeys
>
> ' Loop through the array of subkeys
> For Each subkey In arrSubKeys
>
> objReg.GetDWORDValue HKEY_LOCAL_MACHINE, strKeyPath1 & "\" & subKey,
> "Characteristics", intCharacterics
> objReg.GetStringValue HKEY_LOCAL_MACHINE, strKeyPath1 & "\" & subKey,
> "NetCfgInstanceID", strNetCfgInstanceID
> objReg.GetDWORDValue HKEY_LOCAL_MACHINE, strKeyPath2 & "\" &
> strNetCfgInstanceID & "\Connection", "MediaSubType", intMediaSubType
>
> ' *** 132 means its a physical adaptor and 2 means it Wireless ***
> If (intCharacterics = 132 AND intMediaSubType = 2) then
>
> Return = objReg.SetStringValue (HKEY_LOCAL_MACHINE, strKeyPath1 & "\"
> & subKey, "LOM", "1")
> if Return = 0 then
> Wscript.Echo "LOM sucessfully set to 1 for wirless card " &
> strDriverDesc
> else
> Wscript.Echo "Error: LOM failed to be set to 1 for wireless card "
> &
> strDriverDesc
> End if
>
> End If
>
> Next
>
> ================ cut here =================
>
>
> "blooney" wrote:
>
>> Is anyone aware of automated methods in XP to switch off the wireless
>> interface when connected to wired Ethernet? Most options I've seen
>> involve
>> convoluted scripting. Users don't seem to be able to handle manual
>> process,
>> and we don't find any XP Group Policy that will help.
>>
>> Tom