Effaceur de fichier automatique
Résolu
Utilisateur anonyme
-
Utilisateur anonyme -
Utilisateur anonyme -
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
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 bin - Guide
- Fichier epub - Guide
- Logiciel de sauvegarde automatique gratuit - Guide
- Fichier rar - Guide
- Comment réduire la taille d'un fichier - Guide
1 réponse
yg_be
Messages postés
23437
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 587
bonjour,
"cela ne fonctionne pas": qu'observes-tu?
peut-être:
"cela ne fonctionne pas": qu'observes-tu?
peut-être:
objFSO.DeleteFile("F:\" + cstr(iNbFois) )
Utilisateur anonyme
Merci a toi ce bout de code fonctionne mon programme efface bien tous les fichiers