Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1413 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Vider la corbeille avec un fichier *.vbs

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Vider la corbeille avec un fichier *.vbs

n°1338153
george258
Posté le 03-04-2006 à 20:01:58  profilanswer
 

Bonjour,
 
Je voudrais essayer de créer un fichier *.vbs qui quand je clique sur lui me vide ma corbeille et me supprime mes fichier TMP sur toutes mes sessions.
Voilà mon code source :
 

Code :
  1. Dim ObjShell, Afile, Thefiles
  2. Set FSo = WScript.CreateObject("Scripting.FileSystemObject" )
  3. set Afolder=FSO.GetFolder("C:\Documents and Settings\Gautier\Local Settings\Temp" )
  4. set Afolder=FSO.GetFolder("C:\Documents and Settings\Antonin\Local Settings\Temp" )
  5. set Afolder=FSO.GetFolder("C:\Documents and Settings\Tristan\Local Settings\Temp" )
  6. set Afolder=FSO.GetFolder("C:\Documents and Settings\Eric\Local Settings\Temp" )
  7. set Afolder=FSO.GetFolder("C:\Documents and Settings\Alexandrine\Local Settings\Temp" )
  8. Set TheFiles = Afolder.Files
  9. On Error Resume Next
  10. For Each AFile In TheFiles
  11. If UCase(FSO.GetExtensionName(AFile.Path)) = "TMP" then
  12. AFile.Delete
  13. End if
  14. Next


 
Je voudrais juste savoir comment vider la corbeille en vbs sinon avec une possibilité en language C ?
 
Merci d'avance ! :)

mood
Publicité
Posté le 03-04-2006 à 20:01:58  profilanswer
 

n°1339088
george258
Posté le 04-04-2006 à 19:25:10  profilanswer
 

Vous avec des solutions ? Existe-t-il une solution ?

n°1339093
breizhbugs
Posté le 04-04-2006 à 19:43:37  profilanswer
 

la corbeille est dans le dossier "recycled" a la racine de chaque partition

n°1339769
george258
Posté le 05-04-2006 à 15:57:59  profilanswer
 

Euh merci, mais je ne connais pas du tout le vbs, vu que je programme un peu le PHP/HTML/C j'essai mais je ne sais pas comment faire pour lire de la vider !
 
Merci d'avance !

n°1339984
breizhbugs
Posté le 05-04-2006 à 19:50:23  profilanswer
 

Code :
  1. set Afolder=FSO.GetFolder("C:\recycled" )
  2. ...


Message édité par breizhbugs le 05-04-2006 à 19:50:53
n°1340908
george258
Posté le 06-04-2006 à 19:05:12  profilanswer
 

Excuse moi mais il me dit que c:\recycled est introuvable. Je vais refaire des recherche dessus !
 
Merci

n°1340926
breizhbugs
Posté le 06-04-2006 à 19:49:19  profilanswer
 

Le dossier recycled est un dossier caché, cela influe peut etre?


Message édité par breizhbugs le 06-04-2006 à 19:49:42
n°1342159
george258
Posté le 08-04-2006 à 19:34:51  profilanswer
 

Désolé mais en fichier caché il n'est nul part... Je suis sous Windows XP sa n'a pas marché mais sous Windows 95 sa marche ! La recherche de : corbeille, recycled n'à pas marché (n'à rien trouvé)
 
Merci

n°1342178
breizhbugs
Posté le 08-04-2006 à 20:07:29  profilanswer
 

Bon apres quelques recherches plus poussée, il semble qu'il y ait une fonction systeme pour vider la corbeille.
voici un code que j'ai trouvé:
http://www.vbcode.com/Asp/showsn.asp?theID=5333
 
Sinon, je maitrise mal (pas?) le VB mais quand tu fais

Code :
  1. Set FSo = WScript.CreateObject("Scripting.FileSystemObject" )
  2. set Afolder=FSO.GetFolder("C:\Documents and Settings\Gautier\Local Settings\Temp" )
  3. set Afolder=FSO.GetFolder("C:\Documents and Settings\Antonin\Local Settings\Temp" )
  4. set Afolder=FSO.GetFolder("C:\Documents and Settings\Tristan\Local Settings\Temp" )
  5. set Afolder=FSO.GetFolder("C:\Documents and Settings\Eric\Local Settings\Temp" )
  6. set Afolder=FSO.GetFolder("C:\Documents and Settings\Alexandrine\Local Settings\Temp" )
  7. Set TheFiles = Afolder.Files


AFolder est bien une liste de repertoires? Si ce n'est pas le cas tu n'efface que les fichiers du dernier repertoire, celui d'alexandrine (jolie prénom!)
D'apres la doc que j'ai trouvé, il existe aussi une fonction
.GetSpecialFolder() ( http://msdn.microsoft.com/library/ [...] 6689a1.asp )
qui pourrait te permettre de trouver le repertoire TEMP de windows (c:\windows\TEMP), mais j'ignore si ce repertoire est utilisé car il y a redondance avec le repertoire TEMP de l'utilisateur.

n°1347996
george258
Posté le 17-04-2006 à 07:42:08  profilanswer
 

Ben, ce que tu m'as expliqué après j'ai rien compris... Mais bon, c'est pas grave ! Sinon le script ne marche toujours pas je vais testé une autre chose je te dit ce que j'ai fait après !


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Vider la corbeille avec un fichier *.vbs

 

Sujets relatifs
Fichier effacer contenu vb.netAfficher le contenu d'un fichier
rechercher dans un fichier textewikirenderer et fichier texte...
Faire un appel à des variables contenu dans un fichierDécouper un fichier audio
comment je peux créé un fichier éxécutable svpcopier le résultat d'une commande dans un fichier
inserer une page HTML dans un fichier xslVider un fichier texte
Plus de sujets relatifs à : Vider la corbeille avec un fichier *.vbs


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR