Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté de
tester le script pour exécuter une commande a distant ; j'obtient toujours
une erreur d'ActiveX, sur tous les postes testés ainsi que sur mon poste.
Dans le CHM, sommaire,
Technologies de Microsoft..
+ Windows Script Host
++Référence
+++Objet
++++WshRemote
Dim Controller, RemoteScript
Set Controller = WScript.CreateObject("WSHController")
Set RemoteScript = Controller.CreateScript("test.js", "remoteserver")
RemoteScript.Execute
Do While RemoteScript.Status <> 2
WScript.Sleep 100
Loop
Bien entendu, j'ai remplacer "remoteserver" en "mon_poste" et "test.js" en
un "c:toto.vbs".J'ai aussi essayé de ne pas préciser le nom du poste
(comme indiquer dans le CHM)
L'erreur est : Script: %mon script%
Ligne : 3
Caract: 1
Erreur : Un composant ActiveX ne peut pas créer un objet.
Code : 800A01AD
Source : Erreur d'exécution Microsoft VBScript
Si vous arrivez a exécuter a distance, faite moi un coller de votre code,
Merci,
GOWAP
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté de
tester le script pour exécuter une commande a distant ; j'obtient toujours
une erreur d'ActiveX, sur tous les postes testés ainsi que sur mon poste.
Dans le CHM, sommaire,
Technologies de Microsoft..
+ Windows Script Host
++Référence
+++Objet
++++WshRemote
Dim Controller, RemoteScript
Set Controller = WScript.CreateObject("WSHController")
Set RemoteScript = Controller.CreateScript("test.js", "remoteserver")
RemoteScript.Execute
Do While RemoteScript.Status <> 2
WScript.Sleep 100
Loop
Bien entendu, j'ai remplacer "remoteserver" en "mon_poste" et "test.js" en
un "c:toto.vbs".J'ai aussi essayé de ne pas préciser le nom du poste
(comme indiquer dans le CHM)
L'erreur est : Script: %mon script%
Ligne : 3
Caract: 1
Erreur : Un composant ActiveX ne peut pas créer un objet.
Code : 800A01AD
Source : Erreur d'exécution Microsoft VBScript
Si vous arrivez a exécuter a distance, faite moi un coller de votre code,
Merci,
GOWAP
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté de
tester le script pour exécuter une commande a distant ; j'obtient toujours
une erreur d'ActiveX, sur tous les postes testés ainsi que sur mon poste.
Dans le CHM, sommaire,
Technologies de Microsoft..
+ Windows Script Host
++Référence
+++Objet
++++WshRemote
Dim Controller, RemoteScript
Set Controller = WScript.CreateObject("WSHController")
Set RemoteScript = Controller.CreateScript("test.js", "remoteserver")
RemoteScript.Execute
Do While RemoteScript.Status <> 2
WScript.Sleep 100
Loop
Bien entendu, j'ai remplacer "remoteserver" en "mon_poste" et "test.js" en
un "c:toto.vbs".J'ai aussi essayé de ne pas préciser le nom du poste
(comme indiquer dans le CHM)
L'erreur est : Script: %mon script%
Ligne : 3
Caract: 1
Erreur : Un composant ActiveX ne peut pas créer un objet.
Code : 800A01AD
Source : Erreur d'exécution Microsoft VBScript
Si vous arrivez a exécuter a distance, faite moi un coller de votre code,
Merci,
GOWAP
Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== > 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== > Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier "c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
Dans le message news:OpAp8gbzFHA.2064@TK2MSFTNGP09.phx.gbl ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== > 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (\xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== > Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs \GRANDBASSAM
RemoteScript remotescript.vbs sur \GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier "c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
Jean-Claude.Bellamy@wanadoo.fr * JC.Bellamy@free.fr
Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== > 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== > Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier "c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" a écrit dans le
message de news:Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier "c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" <Jean-Claude.Bellamy@wanadoo.fr> a écrit dans le
message de news: u8A8dqdzFHA.3540@TK2MSFTNGP10.phx.gbl...
Dans le message news:OpAp8gbzFHA.2064@TK2MSFTNGP09.phx.gbl ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (\xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs \GRANDBASSAM
RemoteScript remotescript.vbs sur \GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier "c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
Jean-Claude.Bellamy@wanadoo.fr * JC.Bellamy@free.fr
Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" a écrit dans le
message de news:Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier "c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
Coucou,
j'ai fais un petit script pour l'activation et le teste des "Remote".
Ci-joint a ce courriel
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" a écrit dans le
message de news:Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >>> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >>> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier
"c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
Coucou,
j'ai fais un petit script pour l'activation et le teste des "Remote".
Ci-joint a ce courriel
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
eR3SnZJ0FHA.916@TK2MSFTNGP10.phx.gbl...
Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" <Jean-Claude.Bellamy@wanadoo.fr> a écrit dans le
message de news: u8A8dqdzFHA.3540@TK2MSFTNGP10.phx.gbl...
Dans le message news:OpAp8gbzFHA.2064@TK2MSFTNGP09.phx.gbl ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >>> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (\xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >>> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs \GRANDBASSAM
RemoteScript remotescript.vbs sur \GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier
"c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
Jean-Claude.Bellamy@wanadoo.fr * JC.Bellamy@free.fr
Coucou,
j'ai fais un petit script pour l'activation et le teste des "Remote".
Ci-joint a ce courriel
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" a écrit dans le
message de news:Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >>> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >>> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier
"c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
J'ai oublié de vérifier la version du WSH ! C'est nul : je vous laisse
vérifier que vous êtes bien en 5.6.
(il dois bien y avoir un truc pour ca).
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:Coucou,
j'ai fais un petit script pour l'activation et le teste des "Remote".
Ci-joint a ce courriel
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" a écrit dans le
message de news:Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >>>> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >>>> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier
"c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
J'ai oublié de vérifier la version du WSH ! C'est nul : je vous laisse
vérifier que vous êtes bien en 5.6.
(il dois bien y avoir un truc pour ca).
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
eTRgLNx0FHA.1132@TK2MSFTNGP10.phx.gbl...
Coucou,
j'ai fais un petit script pour l'activation et le teste des "Remote".
Ci-joint a ce courriel
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
eR3SnZJ0FHA.916@TK2MSFTNGP10.phx.gbl...
Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" <Jean-Claude.Bellamy@wanadoo.fr> a écrit dans le
message de news: u8A8dqdzFHA.3540@TK2MSFTNGP10.phx.gbl...
Dans le message news:OpAp8gbzFHA.2064@TK2MSFTNGP09.phx.gbl ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:
Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >>>> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (\xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >>>> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs \GRANDBASSAM
RemoteScript remotescript.vbs sur \GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier
"c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
Jean-Claude.Bellamy@wanadoo.fr * JC.Bellamy@free.fr
J'ai oublié de vérifier la version du WSH ! C'est nul : je vous laisse
vérifier que vous êtes bien en 5.6.
(il dois bien y avoir un truc pour ca).
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:Coucou,
j'ai fais un petit script pour l'activation et le teste des "Remote".
Ci-joint a ce courriel
GOWAP
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:Encore une victoire de JCB !
Y a-t-il une solution GPO pour la clef Remote=1 ?
Voir aussi peut être pour le "wscript -regserver" ?
Pour info, je suis obliger de faire les manipulation aussi pour le XPsp2
et
2003sp1... pffff
Merci,
GOWAP
"Jean-Claude BELLAMY" a écrit dans le
message de news:Dans le message news: ,
GOWAP <gowap@@@fr.fm> s'est ainsi exprimé:Coucou,
j'ai télécharger le "Documentation Windows Script 5.6" et j'ai tenté
de tester le script pour exécuter une commande a distant ; j'obtient
toujours une erreur d'ActiveX, sur tous les postes testés ainsi que
sur mon poste.
[...]
Si vous arrivez a exécuter a distance, faite moi un coller de votre
code, Merci,
Ah le RemoteScripting !!!!!!
Effectivement, la doc à ce sujet est bugguée, ou plus exactement très
INCOMPLÈTE!
Pour que le "Remote scripting" fonctionne, plusieurs conditions doivent
être remplies :
1) Disposer de WSH 5.6
("WSHController" est une nouveauté de cette version)
2) Le script exécuté à distance ne doit pas interagir avec le bureau
(pas de boites de dialogue, écriture dans une console, ...)
3) Les scripts distants doivent être autorisés.
Pour cela on doit avoir dans la BDR de la machine distante :
Clef :
HKLMSOFTWAREMicrosoftWindows Script HostSettings
Entrée :
Remote
Type :
REG_SZ
Valeur :
"1"
4) Il faut avoir exécuté la commande suivante (sur les machines XP)
wscript -regserver
(cette option n'apparait pas dans la liste si on tape wscript /?)
NB: Cette commande n'est à exécuter qu'une seule fois.
---------------------------------------------------------------------
EXEMPLE TEST :
1) "runremote.vbs" (script de lancement)
============================== >>>> 2 paramètres :
- le script à exécuter ("x:xxxxxxxxxxxxxxx.vbs")
- le nom d'ordinateur distant (xxxxxxx)
------------ couper ici ------------
Set args = Wscript.Arguments
If args.count<>2 Then wscript.quit
script=args(0)
computer=args(1)
Set Controller = WScript.CreateObject("WSHController")
WScript.Echo "RemoteScript " & script & " sur " & computer
' connexion sur la machine distante
Set RemoteScript = Controller.CreateScript(script, computer)
' Exécution du script
RemoteScript.Execute
' Boucle d'attente de fin du script distant
Do While RemoteScript.Status <> 2
WScript.Echo "Status =" & RemoteScript.Status
WScript.Sleep 100
Loop
WScript.Echo "Status =" & RemoteScript.Status
------------ couper ici ------------
2) "remotescript.vbs" (script lancé à distance)
================================== >>>> Ce script crée sur la machine distante un fichier texte
"c:testremote.txt" contenant les noms de machine
et d'utilisateur et la date et l'heure de création
------------ couper ici ------------
Set net = Wscript.CreateObject("WScript.Network")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
user=net.UserName
computer=net.ComputerName
set fic=fso.CreateTextFile("c:testremote.txt", true)
fic.Writeline "Bienvenue à " & user & " sur " & computer & VBCRLF
fic.writeline "Test de script exécuté à distance"
fic.Writeline "exécuté le " & Date & " à " & Time
fic.close
------------ couper ici ------------
Sur la machine locale, on exécute la commande :
H:WSH>runremote.vbs remotescript.vbs GRANDBASSAM
RemoteScript remotescript.vbs sur GRANDBASSAM
Status =1
Status =1
Status =2
Sur la machine distante (ici GRANDBASSAM), le fichier
"c:testremote.txt"
a bien été créé, et contient ceci :
Bienvenue à BELLAMY sur GRANDBASSAM
Test de script exécuté à distance
exécuté le 10/10/2005 à 21:50:26
ATTENTION à cet #?!§%*$ de Microsoft AntiSpyware !!!
Mes scripts (créés il y a déjà quelque temps) ne fonctionnaient plus !
Or c'était cet andouille de MAS qui me bloquait le script "téléporté" !
PS: pour paramétrer facilement la BDR, j'ai repris un fichier "wsh.adm"
(trouvé sur le NET) et que j'ai traduit (en pièce-jointe).
Ouvrir GPEDIT.MSC, et suivre la procédure que je décris ici :
http://www.bellamyjc.org/fr/strategie.html#ajout
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
*
Bonjour.
cdbl(replace(wscript.version,".",","))
Alain CROS
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
#
| En wsh/vbscript 5.1, la comparaison de wscript.version avec un 5.6
génère
| une erreur ; le premier est en texte et le seconde un numérique.
| J'ai cherché à convertir le premier en numérique sous la version 5.1
pour
| faire le teste, avec un cdbl ou val ou parseint, rien a faire.
| Quel méthode utilisé pour comparer autre qu'en texte comme : if
| wscript.version<>"5.6" then...
| Car c'est pas propre.
|
| Merci
| GOWAP
Bonjour.
cdbl(replace(wscript.version,".",","))
Alain CROS
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
#lqZedL1FHA.3756@tk2msftngp13.phx.gbl...
| En wsh/vbscript 5.1, la comparaison de wscript.version avec un 5.6
génère
| une erreur ; le premier est en texte et le seconde un numérique.
| J'ai cherché à convertir le premier en numérique sous la version 5.1
pour
| faire le teste, avec un cdbl ou val ou parseint, rien a faire.
| Quel méthode utilisé pour comparer autre qu'en texte comme : if
| wscript.version<>"5.6" then...
| Car c'est pas propre.
|
| Merci
| GOWAP
Bonjour.
cdbl(replace(wscript.version,".",","))
Alain CROS
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
#
| En wsh/vbscript 5.1, la comparaison de wscript.version avec un 5.6
génère
| une erreur ; le premier est en texte et le seconde un numérique.
| J'ai cherché à convertir le premier en numérique sous la version 5.1
pour
| faire le teste, avec un cdbl ou val ou parseint, rien a faire.
| Quel méthode utilisé pour comparer autre qu'en texte comme : if
| wscript.version<>"5.6" then...
| Car c'est pas propre.
|
| Merci
| GOWAP
Bonjour.
cdbl(replace(wscript.version,".",","))
Alain CROS
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
#
| En wsh/vbscript 5.1, la comparaison de wscript.version avec un 5.6
génère
| une erreur ; le premier est en texte et le seconde un numérique.
| J'ai cherché à convertir le premier en numérique sous la version 5.1
pour
| faire le teste, avec un cdbl ou val ou parseint, rien a faire.
| Quel méthode utilisé pour comparer autre qu'en texte comme : if
| wscript.version<>"5.6" then...
| Car c'est pas propre.
|
| Merci
| GOWAP
Bonjour.
cdbl(replace(wscript.version,".",","))
Alain CROS
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
#lqZedL1FHA.3756@tk2msftngp13.phx.gbl...
| En wsh/vbscript 5.1, la comparaison de wscript.version avec un 5.6
génère
| une erreur ; le premier est en texte et le seconde un numérique.
| J'ai cherché à convertir le premier en numérique sous la version 5.1
pour
| faire le teste, avec un cdbl ou val ou parseint, rien a faire.
| Quel méthode utilisé pour comparer autre qu'en texte comme : if
| wscript.version<>"5.6" then...
| Car c'est pas propre.
|
| Merci
| GOWAP
Bonjour.
cdbl(replace(wscript.version,".",","))
Alain CROS
"GOWAP" <gowap@@@fr.fm> a écrit dans le message de news:
#
| En wsh/vbscript 5.1, la comparaison de wscript.version avec un 5.6
génère
| une erreur ; le premier est en texte et le seconde un numérique.
| J'ai cherché à convertir le premier en numérique sous la version 5.1
pour
| faire le teste, avec un cdbl ou val ou parseint, rien a faire.
| Quel méthode utilisé pour comparer autre qu'en texte comme : if
| wscript.version<>"5.6" then...
| Car c'est pas propre.
|
| Merci
| GOWAP
Ca cause un autre pbl !
Comment savoir si je dois avoir un "." ou "," ?
Pourquoi le WScript.version ne retourne pas le format conforme au code
régional ?
Comment être indépendant du code régional pour convertir le WScript.version
(alpha) en cdbl ? Et pourquoi le cdbl("5.6") sur WSH5.1 ne retourne pas un
numérique 5, comme val qui s'arrêt dès qu'il trouve un caractère nom
conforme au numérique du code régional ?
Bon, comment fait-on proprement et pour tous les postes l'identification de
la version du WSH/VBscript sans que ca nous plante dans les pattes...
Merci de me filler vos idées.....
Ca cause un autre pbl !
Comment savoir si je dois avoir un "." ou "," ?
Pourquoi le WScript.version ne retourne pas le format conforme au code
régional ?
Comment être indépendant du code régional pour convertir le WScript.version
(alpha) en cdbl ? Et pourquoi le cdbl("5.6") sur WSH5.1 ne retourne pas un
numérique 5, comme val qui s'arrêt dès qu'il trouve un caractère nom
conforme au numérique du code régional ?
Bon, comment fait-on proprement et pour tous les postes l'identification de
la version du WSH/VBscript sans que ca nous plante dans les pattes...
Merci de me filler vos idées.....
Ca cause un autre pbl !
Comment savoir si je dois avoir un "." ou "," ?
Pourquoi le WScript.version ne retourne pas le format conforme au code
régional ?
Comment être indépendant du code régional pour convertir le WScript.version
(alpha) en cdbl ? Et pourquoi le cdbl("5.6") sur WSH5.1 ne retourne pas un
numérique 5, comme val qui s'arrêt dès qu'il trouve un caractère nom
conforme au numérique du code régional ?
Bon, comment fait-on proprement et pour tous les postes l'identification de
la version du WSH/VBscript sans que ca nous plante dans les pattes...
Merci de me filler vos idées.....