script changer d'ip

Version imprimable

12/03/2009, 15h50
hubald

script changer d'ip

Bonjours, je voudrais changer d'ip tout en ayant toujours accès a internet. Je peux le faire par l'interface graphique, mais cela demande plusieurs manip et à la longue cela devient fatiguant.

Je procède comme cela d'habitude

ouvrir une fenêtre dos et taper ipconfig/release

Aller dans les propriété tcp/ip et écrire n'importe quoi commeip masque et passerelle

sortir des propriété tcp/ip

y revenir et cocher obtenir ip automatiquement

sortir des propriétés tcp/ip

entrer dans la fenêtre dos ipconfig/renew.

Je me demandais si il y avait moyen de faire un script qui ferais la même chose, ce serait bien plus rapide.

dsl pour le double poste, mais en fait dans mon script je bloque à l'étape ou je coche la case obtenir une ip automatiquement, j'ai essayé la méthode enableDHCP, mais j'ai un message d'erreur

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
strComputer = "."
set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
set objAdapterConfig = objWMI.Get("Win32_NetworkAdapterConfiguration")
intRL = objAdapterConfig.ReleaseDHCPLeaseAll()
configIP()
intIpAuto = objAdapterConfig.EnableDHCP()
intRN = objAdapterConfig.RenewDHCPLeaseAll()
 
function configIP()
	arrIPAddress = Array("10.240.2.40")
	arrSubnetMask = Array("255.255.255.0")
	arrGateway = Array("10.240.2.200")
	Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
	Set colNetAdapters = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
	For Each objNetAdapter in colNetAdapters
		errEnableStatic = objNetAdapter.EnableStatic(arrIPAddress, arrSubnetMask)
		errGateways = objNetAdapter.SetGateways(arrGateway)
	Next
End function

17/03/2009, 09h39
ced600

Citation:

Envoyé par hubald

Bonjours, je voudrais changer d'ip tout en ayant toujours accès a internet. Je peux le faire par l'interface graphique, mais cela demande plusieurs manip et à la longue cela devient fatiguant.

Je procède comme cela d'habitude

ouvrir une fenêtre dos et taper ipconfig/release

Aller dans les propriété tcp/ip et écrire n'importe quoi commeip masque et passerelle

sortir des propriété tcp/ip

y revenir et cocher obtenir ip automatiquement

sortir des propriétés tcp/ip

entrer dans la fenêtre dos ipconfig/renew.

Je me demandais si il y avait moyen de faire un script qui ferais la même chose, ce serait bien plus rapide.

Désolé mais de cette manière tu perds ton accés à internet. Essaye d'aller sur le net après ton release, et tu verras que tu n'y arriveras pas.
Y a juste que si tu as ouvert un IE, tant que tu n'actualises pas, tu ne vois aps que tu as perdus ta connection.

Citation:

mais j'ai un message d'erreur

Quoi comme message et sur quelle ligne ?
18/03/2009, 18h38
hubald

j'ai fait ce procédé assez souvent et mon ip change sans que je perde ma connexion. n'oubli pas que la dernière étape consiste à faire un renew
20/03/2009, 19h40
ced600

Justement, la première étape fait un release.
Donc tu supprime la configuration IP.

Tu es toujours physiquement attaché, mais tu n'as plus de configuration IP.
Donc si tu reste générique sur les termes je dirais que tu as perdu ta connexion, car souvent par connexion on parle de connexion internet.

En fait tu pers juste la configuration IP, mais cela rends impossible toute navigation.

Ensuite tu en récupère une par le renew.

Mise à part cela qui n'a pas grande importance :

Citation:

Quoi comme message et sur quelle ligne ?

Peux tu répondre à cette question ?