script en VBS

script en VBS - VB/VBA/VBS - Programmation

Marsh Posté le 08-09-2008 à 18:31:53    

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 :
  1. 'ici on tue le processus d'outlook si il est lancé au démarrage
  2. '------------------------------------------------------------------------------------
  4. strComputer = "."
  5. Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
  7. Set colProcessList = objWMIService.ExecQuery ("Select * from Win32_Process Where Name = 'Outlook.exe'" )
  9. For Each objProcess in colProcessList
  10. objProcess.Terminate()
  11. Next


 
 

Code :
  1. execution d'oulook même si le processus à été tué au début par le script
  2. '------------------------------------------------------------------------
  4. Dim O_Shell
  6.   Set O_Shell = CreateObject("WScript.Shell" )
  7. O_Shell.Run("outlook.exe" )
  11. 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 ^^

Reply

Marsh Posté le 08-09-2008 à 18:31:53   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed