Bonjour,
Dans le cadre d'une migration d'access 2003 vers 2010 et de XP vers Windows 7. J'ai une erreur qui apparait (ou du moins une différence de comportement avec l'utilisation de GetFolder().
L'idée est par exemple de vérifier si si un dossier est vide. Si il y a une erreur on affiche le message.
voici le code:
Dans l'ancienne version ça marchait sans message d'erreur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Set FSO = CreateObject("Scripting.FileSystemObject") If PCheckFolders Then If FSO.GetFolder(PFolderPath).subfolders.count > 0 Then lb1 = False Else lb1 = True End If End If
Lorsque j'exécute sur access 2010 le getFolder(path) renvoi bien le bon dossier mais la partie subFolders (et Files également) n'est pas renseigné. (Si je mets un espion sur l'objet folder j'ai "Erreur définie par l'application ou par l'objet" au niveau des subfolders).
Et je me retrouve avec le message d'erreur "Permission Refusée"
Le comportement de mon objet folder ne semble pas dépendre du fait qu'il contient oui ou non des dossiers ou fichiers.
Précision:
Le programme en question liste les sous dossiers présent dans "D:\Utilisateurs\User\Documents" et bloque notamment aves les dossiers MesImages MesVideos et MaMusique. Des dossiers qui n'apparaissent pas lorsque que je vais voir dans l'explorateur... serait-il cachés ou un truc du genre?
Quelqu'un aurait-il une idée de la source de mon poblème?
Cordialement,
Christophe.
Partager