Bonjour à toutes et à tous, je viens vers vous en espérant qu'une âme charitable se montrera car je nage un peu là ^^
je dois finir un script en vbs (je n'y connais presque rien, mis à part la logique que je comprends parfaitement puisque cela s'apparente à du langage basic comme sur ma ti-82 ;p)
voilà le problème :
1ere étape :
le script doit checker un fichier à un endroit particulier, il compare ce fichier par rapport à un autre fichier sur le serveur.
- SI les fichiers sont identiques ALORS ne rien faire
- SI les fichiers diffèrent ALORS copier le fichier du serveur sur l'endroit particulier du disque dur.
- SI le fichier n'existe pas ALORS copier le fichier du serveur sur l'endroit particulier du disque dur.
2eme étape :
- Le script contrôle si outlook est lancé dans les processus au démarrage du pc (ça j'ai réussi à trouver comment faire)
- SI outlook est dans le processus ALORS on coupe le processus et on le redemarre à la fin du script
ce qui donne ca :
Code :
Code :
- 'ici on tue le processus d'outlook si il est lancé au démarrage
- '------------------------------------------------------------------------------------
- strComputer = "."
- Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
- Set colProcessList = objWMIService.ExecQuery ("Select * from Win32_Process Where Name = 'Outlook.exe'" )
- For Each objProcess in colProcessList
- objProcess.Terminate()
- Next
|
Code :
- execution d'oulook même si le processus à été tué au début par le script
- '------------------------------------------------------------------------
- Dim O_Shell
- Set O_Shell = CreateObject("WScript.Shell" )
- O_Shell.Run("outlook.exe" )
- End Sub
|
Donc là, le "si" dans mon commentaire n'est pas à prendre en compte puisque quoi qu'il se passe, je n'ai pas fais de boucle avec un Dim pour définir quoi que ce soit, donc le script relance toujours outlook.
- SI outlook n'était pas dans le processus au début du script ALORS ne rien faire
merci de l'aide qui sera apportée, j'en peux plus ^^
