creer repertoire et sous repertoire d'un coup !

Question

bonjour

je voudrais creer un repertoire avec ses sous repertoire
par exemple j'ai une string avec un chemin
str= "c:\azerty\qsdfg"
le repertoire azerty n'existe pas
et je voudrais faire : creer str d'un seul coup
avec mkdir il faut creer azerty puis apres qsdfg
et avec fs.createfolder c la meme chose !

avez vous une id&#233;e ?

cs_MasterHack · Answer

il existe un api windows qui traite &#231;a, j'ai deja u l'ocasion de l'utiliser, je ne me souvient pas du non, consulte DarkSidious il est plus famillier aux api que moi.

Life is short...Learn more
Copy Rights <> Rights to Copy

cs_ravachol · Answer

j'ai une function pour le faire ca peut servir a d'autres : Public Function CheckRep(chemin As String) 'As Boolean If Dir$(chemin, vbDirectory) <> "" Then 'CheckRep = True Else 'CheckRep = False MkDir chemin End If End Function Public Function creerArbor(chemAr As String) Dim Str1, Str2 As String Dim J As Integer J = 1 Str1 = "" 'racine While Right(Str1, 1) <> "" Str1 = Left(chemAr, J) J = J + 1 Wend ' rep While Len(Str1) < Len(chemAr) Str1 = Left(chemAr, J) While Right(Str1, 1) <> "" Str1 = Left(chemAr, J) J = J + 1 Wend CheckRep (Str1) Wend End Function

cs_pledoux · Answer

Bonjour,

Pourquoi pas &#231;a, on ajoute juste un ligne ????
         rep_travail="c:	oto"

        If Dir(rep_travail, vbDirectory) = "" Then
            MkDir (rep_travail)
            MkDir (rep_travail + "\BAT")
         endif

Je ne comprends pas trop le sens du message.

cs_ravachol · Answer

bas moi j'ai le chemin complet
c'est a dire 
c:	oto\bat\
directement
donc pour creer toto avant
j'ai du faire une fonction qui extrait la string c:	oto\
de celle sus cit&#233;e !

cs_ravachol · Answer

et bien sur checker ci c:	oto\ existe avant de le creer
puis checker \bat\ puis le creer !
car dans ton exemple si toto exsite il ne cree pas bat
alors que peut etre que bat n'esite pas !!!!!!!!!!!

Creer repertoire et sous repertoire d'un coup !

5 réponses

Discussions similaires