Discussion :

[rjl]

Bonjour à tous,

Bonjour, je suis en XP et je fais du bénévolat dans tous mon département pour de la formation micro (basique) ; je me déplace avec 8 portables, un hub, vidéoprojecteur écran,...
Mon problème : Je travaillais souvent pour Internet avec une clé USB ... et des débits variables selon le lieux, l'heure, etc... bref souvent très médiocres.. surtout partagés sur les micros à travers un Proxy.
De plus en plus, je rencontre l'ADSL avec des possibilités superbes.
Seul hic, il me faut changer les config des 8 micros.
Second écueil, je n'ai pas toujours le bon interlocuteur pour la salle municipale pour m'indiquer quelle adresse passerelle et IP pour l'ADSL... Je tâtonne parfois une adresse Livebox (192.168.1.1), parfois nécessité d'être en IP automatique... ce qui ne fait pas mon affaire quand on passe à la pratique en messagerie et que je ne peux pas cibler une ou n machines mais seulement des comptes Gmail, etc...

J'ai trouvé un Script qui me permet de mettre une adresse Internet...
Mais, je ne sais pas avoir l'équivalent en VBS pour déclarer une adresse IP automatique ?
Pas plus pour dire "Ne jamais établir de connexion (Eq. de PanConfig>Options Internet>Connexion)
Ou encore Utiliser un Serveur Proxy donner son adresse et le port (Eq. de PanConfig>Options Internet>Connexion>ParamRéseau)

Si j'ajoute que je suis nul en VBS... merci de votre appui, de votre indulgence et de votre bonne volonté pour être précis sur ce que je peux faire pour solutionner ces points.

@ Bientôt et encore, d'avance, MERCI. RJL9829

[Viduc]

Salut, pourrais tu nous mettre ton script actuel qui te permet de configurer tes adresses...

[rjl]

Bonjour Viduc et merci de ta réponse,

Le script en question n'est qu'une copie d'un autre publié sur le net et que j'ai juste adapté à mes adresses pour voir si je les modifiai bien !! C'est OK donc, ej peux le manipuler (à minima pour moi).
Je le joins en l'état (je crois pour revenir à l'ASDL via une Livebox :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
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.1.11")
strSubnetMask = Array("255.255.255.0")
strPasserelle = Array("192.168.1.1")
strGatewayMetric = Array(1)

For Each objNetAdapter in colNetAdapters
errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
errGateways = objNetAdapter.SetGateways(strPasserelle, strGatewaymetric)
If errEnable = 0 Then
WScript.Echo "The IP address has been changed."
Else
WScript.Echo "The IP address could not be changed."
End If
Next

Dans mon esprit, je devrai donc pouvoir faire mon affaire ce ça quitte à faire si nécessaire un fichier approprié pour chaque micro.
Par contre ce ont les autres possibilités accessibles en Panneau de Config qui me posent problème car s'il faut dans tos les cas aller quand même dans le Panneau de Config quel est alors l'intérêt des script ?
D'avance merci pour tes indications RJL9829

[rjl]

Question préalable : Est-ce simplement faisable ?
Question subsidiaire : Les noms des données à atteindre sont-ils connus ?

Où peut-on les trouver ?

merci de ces précisions RJL9830

[Viduc]

Pour commencer, cherche de ce coté là pour remettre en dhcp:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
objNetAdapter.setDNSServersearchOrder()
objNetAdapter.EnableDHCP()

(la première ligne sert à vider le dns semble t il... )

[rjl]

Merci de l'indication, mais tu me parais bien modeste avec le "semble t'il" car je présume que tu es sûr de ce que tu avances) :

la première ligne sert à vider le dns semble t il

Ce sont des domaines ou je suis débutant et je n'ai pas l'armure adéquate pour me battre sur ce terrain !
Sur un autre fil, j'indiquais avoir chargé (cette nuit) le tuto de Serge Tahé "INTRODUCTION AU LANGAGE VBSCRIPT"... la volonté y est les capacités, pas encore !
Des questions bêtes, "le vider" veut dire le supprimer ou le récupérer ?
Là, je viens de revoir pour confirmation la définition du DNS mais aussi du DHCP avec lequel j'ai eu une confusion... Récupérer le DNS de quoi ? L'adresse que je veux imposer, je la connais et je n'ai pas besoin de son nom DNS ?

Mais, je ne sais pas avoir l'équivalent en VBS pour déclarer une adresse IP automatique ?

Dans ce cas, n'est-ce pas le DHCP qui me serait utile ?
Toutes mes excuses pour des questions brouillonnes et peut-être à côté de la plaque mais, c'est vrai, j'ai besoin de quelques explications (et je suis modeste avec le "quelque").
Merci de ton appui
RJL9830