VBS shell.run poste distant

Le
Robby
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
F. Dunoyer
Le #19724721
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



si c'est juste pour lancer ça tu peux te tourner vers les outils
sysinternals
psexec est exactement ce qu'il te faut

sysinternals c'est maintenant des outils microsoft

--
François Dunoyer
Quelques liens pour Windows : http://fds.mvps.org/AdressesInternets.htm
Site perso : http://fds.mvps.org
Blog : http://fds34.spaces.live.com/
F. Dunoyer
Le #19724821
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



D'un autre coté à écrire un script pour "toucher" au firewall, ce
serait plus judicieux d'utiliser l'objet HNetCfg.FwMgr

avec qq chose comme ça pour le xp

Set objFirewall = CreateObject("HNetCfg.FwMgr")
Set objPolicy = objFirewall.LocalPolicy.CurrentProfile

objPolicy.FirewallEnabled = TRUE


Pour un vista, un seven ou un 2008 ça donnerait qq chose comme ça

sub pFWActived
' Active le firewall dans tous les modes
Dim ofwPolicy2
dim iErreur

' Supporté par le systeme ??
On Error resume next
Set oFwPolicy2 = CreateObject("HNetCfg.FwPolicy2")
iErreur=err.number
On Error goto 0

if iErreur>0 then exit sub

oFwPolicy2.FirewallEnabled(NET_FW_PROFILE2_DOMAIN) = TRUE
oFwPolicy2.FirewallEnabled(NET_FW_PROFILE2_PRIVATE) = TRUE
oFwPolicy2.FirewallEnabled(NET_FW_PROFILE2_PUBLIC) = TRUE

' On fait le menage
Set oFwPolicy2 = nothing
end sub ' ------------------------- pFWActived
-------------------------

--
François Dunoyer
Des infos en Vrac : http://fds.mvps.org/ta/envrac.htm
Site perso : http://www.fdunoyer.net
Blog : http://fds34.spaces.live.com/
F. Dunoyer
Le #19724811
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



Et pour finir si tu es dans un domaine, je t'invite à mettre en place
la GPO qui correspond à ton besoin, ça simplifira de toutes façon
toutes les configs

--
François Dunoyer
Astuces pour Windows : http://fds.mvps.org/ta/
Site perso : http://www.fdunoyer.net
Blog : http://fds34.spaces.live.com/
F. Dunoyer
Le #19724921
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



une derniere couche :) (qui ne repond pas directement) mais qui peut
donner des pistes pour ne plus avoir de problemes... si tu n'es pas
dans un domaine (et même si d'ailleurs c'est à lire)

http://technet.microsoft.com/en-us/library/cc737845(WS.10).aspx#BKMK_tools

--
François Dunoyer
Quelques textes qui m'ont séduit : http://fdunoyer.free.fr/textes.htm
Site perso : http://fds.mvps.org
Blog perso : http://fdunoyer.spaces.live.com/
Blog : http://fds34.spaces.live.com/
Robby
Le #19726671
Merci, Francois pour toutes les reponses;
Mais au fait comment connaitre les differents objets ?
Je ne sais pas comment faire pour connaitre le nom d'un objet
(HNetCfg.FwMgr) ?
est-ce que ton script vbs fonctionne aussi pour un poste à distance ?
Robby.

"F. Dunoyer" news:
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



une derniere couche :) (qui ne repond pas directement) mais qui peut
donner des pistes pour ne plus avoir de problemes... si tu n'es pas dans
un domaine (et même si d'ailleurs c'est à lire)

http://technet.microsoft.com/en-us/library/cc737845(WS.10).aspx#BKMK_tools

--
François Dunoyer
Quelques textes qui m'ont séduit : http://fdunoyer.free.fr/textes.htm
Site perso : http://fds.mvps.org
Blog perso : http://fdunoyer.spaces.live.com/
Blog : http://fds34.spaces.live.com/





Robby
Le #19726741
En fait j'aimerais appliquer l'objet et la commande sur la variable qui est
mon poste distant.
Merci d'avance,
Robby.

"Robby" e$
Merci, Francois pour toutes les reponses;
Mais au fait comment connaitre les differents objets ?
Je ne sais pas comment faire pour connaitre le nom d'un objet
(HNetCfg.FwMgr) ?
est-ce que ton script vbs fonctionne aussi pour un poste à distance ?
Robby.

"F. Dunoyer" de news:
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



une derniere couche :) (qui ne repond pas directement) mais qui peut
donner des pistes pour ne plus avoir de problemes... si tu n'es pas dans
un domaine (et même si d'ailleurs c'est à lire)

http://technet.microsoft.com/en-us/library/cc737845(WS.10).aspx#BKMK_tools

--
François Dunoyer
Quelques textes qui m'ont séduit : http://fdunoyer.free.fr/textes.htm
Site perso : http://fds.mvps.org
Blog perso : http://fdunoyer.spaces.live.com/
Blog : http://fds34.spaces.live.com/










F. Dunoyer
Le #19728241
Robby a écrit :
Merci, Francois pour toutes les reponses;
Mais au fait comment connaitre les differents objets ?
Je ne sais pas comment faire pour connaitre le nom d'un objet (HNetCfg.FwMgr)
?
est-ce que ton script vbs fonctionne aussi pour un poste à distance ?
Robby.

"F. Dunoyer" news:
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



une derniere couche :) (qui ne repond pas directement) mais qui peut donner
des pistes pour ne plus avoir de problemes... si tu n'es pas dans un
domaine (et même si d'ailleurs c'est à lire)

http://technet.microsoft.com/en-us/library/cc737845(WS.10).aspx#BKMK_tools

-- François Dunoyer
Quelques textes qui m'ont séduit : http://fdunoyer.free.fr/textes.htm
Site perso : http://fds.mvps.org
Blog perso : http://fdunoyer.spaces.live.com/
Blog : http://fds34.spaces.live.com/








En ce qui me concerne, en cherchant pour moi et hier suite à ton
message, je n'ai pas trouvé comment le faire a distance en dehors :

- GPO si tu es en domaine
- Psexec ou equivalent (WMI) pour executer depuis un poste distant un
programme sur le poste local

mais je ne suis pas obligatoirement expert de ce domaine

et pour ce qui concerne tous les objets existants LOL
Il faut plonger dedans et essayer de surnager ;)
Le technet et le MSDN sont une bonne aide mais parfois ils donnent plus
envie de s'arracher les cheveux qu'autre chose

bon courage

--
François Dunoyer
Des infos en Vrac : http://fds.mvps.org/ta/envrac.htm
Site perso : http://www.fdunoyer.net
Blog : http://fds34.spaces.live.com/
Marc Lognoul [MVP]
Le #19729861
Bonjour,

Comme le signale François, PSEXEC est une solution directe et efficace pour
ce type de demande en particulier s'il ne faut éxécuter qu'une seule ligne
de command.
Une autre solution en WSH/VBS:
http://www.microsoft.com/technet/scriptcenter/guide/sas_wsh_wwgn.mspx?mfr=true

N'oubliez pas de paramétrer vos règles de firewall avant de l'activer et de
laisser passer les protocoles nécessaires à vos scripts (partage de
fichiers, WMI...).

---
Marc Lognoul [MCSE, MCTS, MVP]
Heureux celui qui a pu pénétrer les causes secrètes des choses
Happy is the one who could enter the secret causes of things

Blog EN: http://www.marc-antho-etc.net/blog/

"F. Dunoyer" news:
Robby a écrit :
Merci, Francois pour toutes les reponses;
Mais au fait comment connaitre les differents objets ?
Je ne sais pas comment faire pour connaitre le nom d'un objet
(HNetCfg.FwMgr) ?
est-ce que ton script vbs fonctionne aussi pour un poste à distance ?
Robby.

"F. Dunoyer" de news:
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



une derniere couche :) (qui ne repond pas directement) mais qui peut
donner des pistes pour ne plus avoir de problemes... si tu n'es pas dans
un domaine (et même si d'ailleurs c'est à lire)

http://technet.microsoft.com/en-us/library/cc737845(WS.10).aspx#BKMK_tools

-- François Dunoyer
Quelques textes qui m'ont séduit : http://fdunoyer.free.fr/textes.htm
Site perso : http://fds.mvps.org
Blog perso : http://fdunoyer.spaces.live.com/
Blog : http://fds34.spaces.live.com/








En ce qui me concerne, en cherchant pour moi et hier suite à ton message,
je n'ai pas trouvé comment le faire a distance en dehors :

- GPO si tu es en domaine
- Psexec ou equivalent (WMI) pour executer depuis un poste distant un
programme sur le poste local

mais je ne suis pas obligatoirement expert de ce domaine

et pour ce qui concerne tous les objets existants LOL
Il faut plonger dedans et essayer de surnager ;)
Le technet et le MSDN sont une bonne aide mais parfois ils donnent plus
envie de s'arracher les cheveux qu'autre chose

bon courage

--
François Dunoyer
Des infos en Vrac : http://fds.mvps.org/ta/envrac.htm
Site perso : http://www.fdunoyer.net
Blog : http://fds34.spaces.live.com/




Robby
Le #19730331
Merci pour ton aide, mais quand j'utilise le lien avec le script donné, j'ai
lerreur :
(7, 1) Erreur d'exécution Microsoft VBScript: Un composant ActiveX ne peut
pas créer un objet.
sur la ligne 7 : Set objRemoteScript
Robby

"Marc Lognoul [MVP]"
Bonjour,

Comme le signale François, PSEXEC est une solution directe et efficace
pour ce type de demande en particulier s'il ne faut éxécuter qu'une seule
ligne de command.
Une autre solution en WSH/VBS:
http://www.microsoft.com/technet/scriptcenter/guide/sas_wsh_wwgn.mspx?mfr=true

N'oubliez pas de paramétrer vos règles de firewall avant de l'activer et
de laisser passer les protocoles nécessaires à vos scripts (partage de
fichiers, WMI...).

---
Marc Lognoul [MCSE, MCTS, MVP]
Heureux celui qui a pu pénétrer les causes secrètes des choses
Happy is the one who could enter the secret causes of things

Blog EN: http://www.marc-antho-etc.net/blog/

"F. Dunoyer" news:
Robby a écrit :
Merci, Francois pour toutes les reponses;
Mais au fait comment connaitre les differents objets ?
Je ne sais pas comment faire pour connaitre le nom d'un objet
(HNetCfg.FwMgr) ?
est-ce que ton script vbs fonctionne aussi pour un poste à distance ?
Robby.

"F. Dunoyer" message de news:
Robby a écrit :
Bonjour,
A partir d'un script VBS, je lance cette
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run ("netsh firewall set opmode mode = enable")
En local ca fonctionne mais comment faire pour le lancer sur un poste
distant.

Merci d'avance,

Robby.



une derniere couche :) (qui ne repond pas directement) mais qui peut
donner des pistes pour ne plus avoir de problemes... si tu n'es pas
dans un domaine (et même si d'ailleurs c'est à lire)

http://technet.microsoft.com/en-us/library/cc737845(WS.10).aspx#BKMK_tools

-- François Dunoyer
Quelques textes qui m'ont séduit : http://fdunoyer.free.fr/textes.htm
Site perso : http://fds.mvps.org
Blog perso : http://fdunoyer.spaces.live.com/
Blog : http://fds34.spaces.live.com/








En ce qui me concerne, en cherchant pour moi et hier suite à ton message,
je n'ai pas trouvé comment le faire a distance en dehors :

- GPO si tu es en domaine
- Psexec ou equivalent (WMI) pour executer depuis un poste distant un
programme sur le poste local

mais je ne suis pas obligatoirement expert de ce domaine

et pour ce qui concerne tous les objets existants LOL
Il faut plonger dedans et essayer de surnager ;)
Le technet et le MSDN sont une bonne aide mais parfois ils donnent plus
envie de s'arracher les cheveux qu'autre chose

bon courage

--
François Dunoyer
Des infos en Vrac : http://fds.mvps.org/ta/envrac.htm
Site perso : http://www.fdunoyer.net
Blog : http://fds34.spaces.live.com/







Publicité
Poster une réponse
Anonyme