Discussion :

[soron59]

Bonjour,

Je cherche à supprimer un fichier si sa taille est égale a 0
j'ai fait ça mais sa ne fonctionne pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile("D:\fichier.txt")
If objFile.Size = 0 Then
   objFSO.DeleteFile("D:\fichier.txt")
End If

si quelqu'un peut me m'aider sa serais parfait

Merci

..........
J'ai trouver la solution le sujet peut etre clos

[hackoofr]

La réponse se trouve ici : Suppression des Dossiers et des Fichiers Vides