Effaceur de fichier automatique

Résolu/Fermé

Gosty_23 Messages postés 8 Date d'inscription vendredi 5 février 2021 Statut Membre Dernière intervention 15 février 2022 - Modifié le 5 févr. 2021 à 22:21
Gosty_23 Messages postés 8 Date d'inscription vendredi 5 février 2021 Statut Membre Dernière intervention 15 février 2022 - 5 févr. 2021 à 22:33

Bonjour,
J'aimerais de l'aide pour mon code d'effaceur de fichier, j'essaye de crée un programme qui va effacer des documents texte automatiquement (les documents s'appellent 1,2,3,4...). Pour l'instant mon code ressemble a ca mais cela ne fonctionne pas:
Dim iNbFois

iNbFois = 1

do
Set objFSO = CreateObject("Scripting.FileSystemObject" )
objFSO.DeleteFile("F:\iNbFois" )
iNbFois = iNbFois+1
loop

merci de votre aide

A voir également:

Effaceur de fichier automatique
Fichier rar - Guide
Comment réduire la taille d'un fichier - Guide
Comment ouvrir un fichier epub ? - Guide
Fichier host - Guide
Ouvrir fichier .bin - Guide

1 réponse

Réponse 1 / 1

yg_be Messages postés 23408 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 26 décembre 2024 Ambassadeur 1 557
5 févr. 2021 à 22:29

bonjour,
"cela ne fonctionne pas": qu'observes-tu?
peut-être:

objFSO.DeleteFile("F:\" + cstr(iNbFois) )

Gosty_23 Messages postés 8 Date d'inscription vendredi 5 février 2021 Statut Membre Dernière intervention 15 février 2022
5 févr. 2021 à 22:33

Merci a toi ce bout de code fonctionne mon programme efface bien tous les fichiers

Discussions similaires

comment donner les droits sur fichier partage