Scripts para cambiar ip

[locho]

encontre una aplicacion en inet

que es para cambiar la direccion ip a una estatica y viceversa

pero el problema es que no me funciona en windows vista..

en xp ningun problema me cambia por completo la configuracion..pero en vista ni me peska

sera alguna clase o algo asi... por el adaptador

 

trate de modificarlo conotras cosas pero no pasa nada

 

aqui esta el codigo

 

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

 

Set colNetAdapters = objWMIService.ExecQuery _

("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")

 

strIPAddress = Array("192.168.19.68")

strSubnetMask = Array("255.255.0.0")

strGateway = Array("192.168.1.1")

strGatewayMetric = Array(1)

strDNSServers = Array("192.168.1.15", "200.74.0.5")

 

For Each objNetAdapter In colNetAdapters

errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)

errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)

errDNSServers = objNetAdapter.SetDNSServerSearchOrder (strDNSServers)

 

If (errEnable = 0) and (errGateways = 0) and (errDNSServers = 0) Then

WScript.Echo "La configuracion a sido cambiada."

Else

WScript.Echo "No se ha podido cambiar la configuracion."

End If

Next

 

 

 

porfa

 

gracias

 

saludos

[fernanditox]

tengo vista... igual se agradece

[Tecktonik]

como? osea ke tengo ponte tu, telmex ip dinamica y al ejecutarlo keda una ip fija???

 

si es asi confirmamelo porfi!! te lo agradeceria mucho!

 

 

gracias de antemano

[=THE·PIPE=]

no entendi, como haces para poner ip dinamica ??

[axelstone]

Hola

 

Y eso que utilidad tiene??

 

Lo que estas haciendo es solo cambiar la IP en tu red local.

[ipinori]

Compañeros ese codigo solamente lo que hace es cambiar tu IP de Red local a Fija y Dinamica, es imposible hacer que si tienes IP dinamica fijarla. Estos son servicios de tu provedor de Internet y por tener IP fija tiene un costo. Es por esto que crearon las IP Dinamicas para abaratar costos ;)