I have set up a laptop w/ Windows 2000 pro to access our business network and DSL but when the laptop is taken home I have to manually change the IP settings to get it to work with my Cable connection. I know there must be a better way to do this can anyone provide some assistance

Thank

Go to www.globesoft.com and get multinetworkmanager.

--
Regards,

Marina
Microsoft SBS-MVP

"Mark W" <(E-Mail Removed)> schreef in bericht
news:6639125D-45F6-4032-A043-(E-Mail Removed)...
> I have set up a laptop w/ Windows 2000 pro to access our business network
and DSL but when the laptop is taken home I have to manually change the IP
settings to get it to work with my Cable connection. I know there must be a
better way to do this can anyone provide some assistance?
>
> Thanks
>

Setup 2 hardware profiles. One for work & one for home.
Your not really changing any hardware per se but, only
changing the config of your NIC.

>-----Original Message-----
>I have set up a laptop w/ Windows 2000 pro to access our
business network and DSL but when the laptop is taken home
I have to manually change the IP settings to get it to
work with my Cable connection. I know there must be a
better way to do this can anyone provide some assistance?
>
>Thanks
>
>.
>

Tried that but the IP address was not retained when I changed profiles.

strIPaddr=Array("XXX,xXX,XXX,XXX")
strSNMask=Array("XXX,xXX,XXX,XXX")
strGateway=Array("XXX,xXX,XXX,XXX")
strPWINS="XXX,xXX,XXX,XXX"
strSWINS="XXX,xXX,XXX,XXX"
strPDNS= "XXX,xXX,XXX,XXX"
strSDNS= "XXX,xXX,XXX,XXX"
strDNSServer=Array(strPDNS, strSDNS)

Set objService=GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set objEnumerator=objService.ExecQuery("Select * From
Win32_NetworkAdapterConfiguration Where DatabasePath IS NOT NULL")

objService.Security_.impersonationlevel = 3

For Each objInstance in objEnumerator
intStatus=objInstance.SetWINSServer (strPWINS, strSWINS)
intStatus=objInstance.SetDNSServerSearchOrder(strDNSServer)
intStatus=objInstance.EnableStatic (strIPaddr, strSNMask)
intStatus=objInstance.SetGateways(strGateway)
Next





"Mark W" <(E-Mail Removed)> wrote in message
news:879AAB00-DF74-4C54-99E6-(E-Mail Removed)...
> Tried that but the IP address was not retained when I changed profiles.