Bonjour à tous,

Voilà, je ne suis pas VBS développeur, et j'ai déjà eu ENORMEMENT de mal à écrire le script ci-dessous et là j'ai besoin de l'aide de quelqu'un qui puisse reprendre mon script pour effectuer la tache suivante:

Vider le contenu du répertoire c:\winnt\system32\spool\PRINTERS\

Mon problème est que le compte windows depuis lequel je le fais n'est pas administrateur du poste, c'est pourquoi je dois utiliser la commande RUNAS.

Je parviens à effacer un fichier, mais comment puis-je effacer tous les fichiers contenus dans le répertoire donné?

Si quelqu'un me répond, déjà un grand merci, et svp pouvez-vous réécrire le script à partir de mon exemple, car je ne saurais pas adapter votre réponse partielle à ce que j'ai déjà fait.

visual basic code:--------------------------------------------------------------------------------
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
 <script LANGUAGE="VBScript">
'Copyright© 1998. XYZ Productions. All rights reserved.
'**Start Encode**
' Your code goes here.
'/--> Varibles 
   Dim Fso, File, WshShell
'/--> Varibles As Objects
    Set WshShell = Createobject("Wscript.Shell")
    Set Fso = CreateObject("Scripting.FileSystemObject")
    File = "c:\test.vbs"
     WshShell.Run "runas /user:USER", 0, True
      WshShell.Sendkeys "PASSWORD"
'/--> Checks For The File Then If It Exists It deletes It
     If Fso.FileExists(File) Then Fso.DeleteFile(File) End If 
</SCRIPT>
--------------------------------------------------------------------------------