Discussion :

[tdavillars]

Bonjour,

j'ai fait un déploiement pour une désinstallation d'un logiciel sur le parc informatique de ma boite, il se trouve que certaine pc se sont fait complètement nettoyé allant de la désinstallation de 1 ou 2 logiciel voir la totalité

voici mon script :

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
Dim path, path1, rep
Dim directory
 
path = "chemin du logiciel a desinstallé \uninst.exe"
 
path1 = "lieu ou se trouve le répertoire a supprime"
rep = "nom du repertoire a supprimé"
 
'exécution de la désinstallation du logiciel'
 
Set WshShell = WScript.CreateObject("WScript.Shell")
On Error Resume Next
WshShell.Run chr(34) & path & chr(34) & "/S"
If Err>0Then
End If
 
'suppression du répertoire de ce logiciel'
Set Fso = CreateObject("Scripting.FileSystemObject")
Set directory = fso.getFolder(path1)
For Each oSubFld in Directory.SubFolders
If osubfld.names = rep Then
osubfld.delete false
End If
Next

merci pour votre aide

[ced600]

C'est très bien tout cela mais quel est le problème ?

[tdavillars]

le problème est que le script, sur certain pc de façon aléatoire, a désinstallée de 1 a n logiciels installé voir tout les logiciels

[ced600]

Ce script ne désinstale que ce qui se trouve dans path et ne supprime que ce qui se trouve dans path1

[tdavillars]

oui c'est ce que je pensais mais sur un déploiement plusieurs applications ont été désinstallé

[tdavillars]

je précise il ma désinstallé firefox, thunder, gimp, tout les applications de ma boite , ....... je ne pense pas que ce soit le script le problème mais bon je suis un perdu personnellement