Discussion :

[Pandala]

Bonjour à tous. Je suis en stage et je galère un peu sur la création d'un script pour mon patron. Ce script doit mettre à jour le logiciel de messagerie GroupWise sur les poste des utilisateurs, or ils n'ont pas les droit admnistrateur sur leur poste, donc j'aurais aimer avoir votre aide su rla manière de procéder pour que lorsque mon script s'éxécute il est les droits admin.

Voila mon script pour le moment :

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
22
23
24
 
'===================================================================
' Partie installation du client
'===================================================================
 
Set wShell = CreateObject("Wscript.Shell")
 
' Install du client messaging pour Windows XP et 2000
 
wshell.Run "\\SERVEUR\grpwise\software\NT2000\ntwms.exe /q"
wscript.sleep 40000 ' attente pour la suite de l'execution du programme
 
' Installation du client GRPWISE
wshell.Run "\\SERVEUR\grpwise\software\client\win32\setup.exe"
 
'==========================================================================
' Gestion des erreurs
'==========================================================================
 
If err.number <> 0 then
MsgBox "Erreur : " & err.number & " " & err.description
End if
 
Set wShell = Nothing

Au final j'aimerai en faire un .EXE. Je vous remercie d'avance.

[bidou]

un exe en VBScript

[Pandala]

J'ai vu sur le forum qu'il était possible de faire un exe, mais j'avoue que c'est pas le truc le plsu important :$

[omen999]

salut,
un peu de lecture: http://www.bellamyjc.org/fr/superexec.html

[Pandala]

Merci.

[abertaud]

Code :

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

1
2
wshell.Run "\\SERVEUR\grpwise\software\NT2000\ntwms.exe /q"
wscript.sleep 40000 ' attente pour la suite de l'execution du programme

en voyant ca je me dit que ton sleep permet d'attendre la fin de l'exécution de ntwms.exe avant de continuer.

Ca marche peut être, mais le jour où cette exécution dépassera les 40 secondes, tu pourras revenir modifier ton code.

Préfères donc plutot cette ligne de code pour tout optimiser :

Code :

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

wshell.Run """\\SERVEUR\grpwise\software\NT2000\ntwms.exe /q""", 0, True

Les options rajoutées permettent justement d'attendre la fin de l'exécution avant de traiter la ligne suivante dans ton vbs.

[Pandala]

Merci pour cette astuce