Effaceur de fichier automatique
Résolu
Gosty_23
-
Gosty_23 -
Gosty_23 -
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
1 réponse
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 588
bonjour,
"cela ne fonctionne pas": qu'observes-tu?
peut-être:objFSO.DeleteFile("F:\" + cstr(iNbFois) )
