Sujet Précédent Sujet Suivant

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:

1 réponse

Réponse 1 / 1
yg_be Messages postés 23232 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 28 septembre 2024 Ambassadeur 1 538
5 févr. 2021 à 22:29
bonjour,
"cela ne fonctionne pas": qu'observes-tu?
peut-être: 
objFSO.DeleteFile("F:\" + cstr(iNbFois) )
0
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
0

Discussions similaires

comment donner les droits sur fichier partage
ch'ti du 57 -
fil1958 -

2 réponses
Chemin Logo du site de la Cité de l'espace
Keiios -
blux -

11 réponses