Kill erreur 70
Herve_be
Messages postés
1182
Date d'inscription
Statut
Membre
Dernière intervention
-
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
En VB6, parfois sur certains PC j'obtiens une erreur 70 (Permission denied) sur Kill d'un fichier;
j'ai vérifié que le fichier existe :
Comment vérifier avant le Kill qu'il ne va pas recevoir une erreur 70 ?
Ou quelle autre fonction utiliser au lieu de Kill ?
Merci
En VB6, parfois sur certains PC j'obtiens une erreur 70 (Permission denied) sur Kill d'un fichier;
j'ai vérifié que le fichier existe :
Dim oFile As New Scripting.FileSystemObject If oFile.FileExists(BakFile) Then Kill BakFile
Comment vérifier avant le Kill qu'il ne va pas recevoir une erreur 70 ?
Ou quelle autre fonction utiliser au lieu de Kill ?
Merci
3 réponses
-
Bonjour,
Si tu utilises fso, autant utiliser la méthode DeleteFile :
Dim oFile As New Scripting.FileSystemObject If oFile.FileExists(BakFile) Then oFile.DeleteFile BakFile
Ce code présuppose que BakFile est un String contenant le chemin d'accès complet au fichier.
-
Merci pour ta réponse rapide,
C'est en effet plus logique.
J'aurais cependant voulu comprendre pourquoi cette erreur 70 occasionnelle (sur la plupart des PC ça fonctionne sans problème) et surtout si la même erreur ne risque pas de se produire avec FSO. -
Voici des informations sur l'erreur 70 :
https://docs.microsoft.com/fr-fr/office/vba/language/reference/user-interface-help/permission-denied-error-70
Je n'en sais pas plus...
