Afficher seulement les dossiers autorisés!

tump Messages postés 82 Date d'inscription dimanche 25 juillet 2004 Statut Membre Dernière intervention 6 avril 2006 - 19 nov. 2004 à 13:25
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 19 nov. 2004 à 13:35
bonjour
je souhaite faire apparaitre dans une listbox la liste de tous les dossiers auxquels j'ai accès sous "F:"

dossier=dir("f:",vbdirectory)

do while dir<>""

if jai acces au dossier then
listbox1.additem dossier
end if

dossier=dir

loop

probleme : quand je tombe sur un dossier auquel je nai pas acces (restriction reseau), il me met "erreur"
comment lui faire verifier que jai ou pas acces a tel ou tel repertoire ?

poum :-)

1 réponse

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
19 nov. 2004 à 13:35
Si tu fais : dir("f:\.")
une erreur est generée si tu n'es pas autorisé a acceder...

un simple On Error Goto, et c'est OK

Amusez-vous ! ;)
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS
0
Rejoignez-nous