Erreur RunTime '70' Autorisation refusée dans VB6

Question

J'utilise VB6. L'outil que j'ai créé quelques extraits des fichiers zip et les décompresse dans un dossier que je crée locally.In la partie nettoyage de mon code, j'ai supprimé le dossier en utilisant ce code

If (f.FolderExists(path + "Extracted Files") = True) Then 
    f.DeleteFolder (path + "Extracted Files") 
End If  

Quand je lance ce code , j'obtiens une erreur Run Time Error '70' et Permission Denied dans la ligne f.DeleteFolder (path + 'Extracted Files').

Où vais-je mal? Ou dois-je créer le dossier avec une permission différente?

Answer 1

Peut-être qu'un ou plusieurs fichiers sont en lecture seule? Utilisez le paramètre facultatif force pour forcer la suppression:

Answer 2

Vous utilisez une bibliothèque écrite dans une autre langue pour extraire les fichiers? Vérifiez que tout pointeur était ouvert, il est probable que certains fichiers sont ouverts, bonne chance!