Directory en lecture - écriture

Bonjour,

Je crée un fichier à l'aide d'une macro, cette macro est utilisé par plusieurs personne.

J'ai un souci au niveau du chemin où ce fichier va être créé.
Dans la macro j'ai définit ce chemin en "C:\" ---> Or certains utilisateurs n'ont pas le "C:\" ou encore ne sont pas en écriture sur ce dernier.

Est-il possible de lister toutes les directory qui sont en écriture et lecture pour un utilisateur donné ? (on est dans un réseau)

Merci

bonjour,

Code:

---

1 2 3 4 5 6

Sub ShowRemovableDrivesInfo() Dim Drive As Object, MyDrives As String For Each Drive In CreateObject("Scripting.FileSystemObject").Drives debug.print drive.driveletter Next End Sub

---

si ça peut)t'aider..

Merci Maykeul pour ta réponse.

Ton code me liste les drives.

Est-il possible de ne lister que les drives en écriture.

Merci.

cela devrait etre possible par cette voie je pense

Code:

---

1 2 3 4 5 6 7 8

Sub ShowRemovableDrivesInfo() Dim FSo As New FileSystemObject Dim fo As Folder, Drv As Drive For Each Drv In FSo.Drives Set fo = FSo.GetFolder(Drv.RootFolder) If GetAttr(fo.Path) And vbReadOnly Then Debug.Print fo.Attributes Next End Sub

---

NB: tu dois rajouter le référence à "Microsoft Scripting Runtime"

Mayekeul,

Erreur d'exécution ( voir image).

je suppose que cela arrive sur cette ligne?

Code:

---

Set fo = FSo.GetFolder(Drv.RootFolder)

---

c'est un disque amovible?

Oui c'est la ligne qui génére l'erreur.

J'ai pas de disque amovible.

Par contre je suis dans un réseau.

tu peux essayer en ajoutant une condition

Code:

---

if drv.isready then ...

---

Quelle est la différence entre un attribut = 16 et un attribut = 54 ??

voila tout ce que je peux te dire à ce sujet

Merci Maykeul pour ton aide

mais j'arrive pas à trouver l'attribut 54 , c'est bizarre.

je sais, moi non plus!
;)

c'est pas faute d'avoir chercher notes.

je te tiens au courant si jamais!

vbHidden Or vbSystem Or vbDirectory Or vbArchive ===>> 54
Mais vous me paraissez vous égarer quelque peu ...

Avant d'aller plus loin (on n'y ira que s'il le faut réellement) : la méthode la plus simple est de se servir d'un sous-répertoire de l'aplication en cours ... (il a bien fallu l'installer quelque part, donc avec droit d'écrire, non ?).