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