Suppression de fichier

Suppression de fichier - VB/VBA/VBS - Programmation

Marsh Posté le 17-06-2005 à 14:13:37    

Bonjour,
 
Est-ce qu'il est possible en VBA de supprimer un fichier ? Je parle bien de supprimer un fichier dont on connait le chemin... pas de supprimer des lignes de ce fichier ....
Si c'est possible, comment fait-on ?
 
Merci d'avance

Reply

Marsh Posté le 17-06-2005 à 14:13:37   

Reply

Marsh Posté le 17-06-2005 à 15:50:04    

Ant8386 a écrit :

Bonjour,
 
Est-ce qu'il est possible en VBA de supprimer un fichier ? Je parle bien de supprimer un fichier dont on connait le chemin... pas de supprimer des lignes de ce fichier ....
Si c'est possible, comment fait-on ?
 
Merci d'avance


Tu n'as pas beaucoup cherché dans l'aide je pense?
 
As-tu déjà essayé de "kill"er un fichier?  :lol:

Reply

Marsh Posté le 09-08-2005 à 15:12:37    

ben, chez moi kill me renvoie "Erreur d'exécution Microsoft VBScript: Type incompatible: 'Kill'"
une idée ??

Reply

Marsh Posté le 09-08-2005 à 20:53:39    

t'as essayé  
Kill "chemin complet du fichier"
??


---------------
now : do nothing
Reply

Marsh Posté le 28-08-2007 à 14:40:03    

jlestat a écrit :

ben, chez moi kill me renvoie "Erreur d'exécution Microsoft VBScript: Type incompatible: 'Kill'"
une idée ??


 
Bonjour,
 
Voila essaye ca et répond moi   :)
 
Set objFSO = CreateObject("Scripting.FileSystemObject" )
objFSO.DeleteFile ("C:\dosier\fichier.txt" )

Reply

Marsh Posté le 25-06-2008 à 12:57:22    

Déterrage de topic ^^
Je voudrais utiliser un script qui supprime plusieurs fichiers. Le hic, c'est que je ne connais pas forcément le répertoire ou ils sont car ils se trouvent dans Documents and Settings. En fait, il faudrait que si l'instruction de suppressions échoue, qu'il n'envoi pas un message d'erreur et qu'il continue a supprimer.
 

Citation :

Set objFSO = CreateObject("Scripting.FileSystemObject" )
objFSO.DeleteFile("C:\Documents and Settings\Administrateur\Local Settings\Application Data\Centered Systems\Second Copy\Profiles.dat" )
Set objFSO = CreateObject("Scripting.FileSystemObject" )
objFSO.DeleteFile("C:\temp\SC.txt" )
Set objFSO = CreateObject("Scripting.FileSystemObject" )
objFSO.DeleteFile("C:\temp\SC.doc" )


 
si le .txt ne se trouvent pas la, il m'envoie une belle erreur et n'essaye pas de supprimer le .doc


Message édité par devil86 le 25-06-2008 à 12:59:11

---------------
[GamerTag] : Devilash86  
Reply

Marsh Posté le 25-06-2008 à 13:25:44    

Fais d'abord un test sur l'existence du fichier, avant de le supprimer. S'il n'existe pas, tu ne le supprimes pas.
 
C'est la méthode FileExists de FileSystemObject.

Reply

Marsh Posté le 25-06-2008 à 14:00:36    

Ok merci je vais essayer


---------------
[GamerTag] : Devilash86  
Reply

Sujets relatifs:

Leave a Replay

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