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