Créer un dossier (ou sous dossier)

Contenu du snippet

Oui je sais...
vous allez me dire que MkDir le fait tres bien et qu'il est deja sur le site plusieurs fois...
Mais MkDir a le gros defaut de ne creer un dossier uniquement si le dossier parent existe.
ce qui veut dire que si je veux creer le dossier:
c:\Dossier1\Dossier2\Dossier3\Dossier4\Dossier5\Dossier6\
je suis obligé de faire
mkdir "c:\Dossier1\"
mkdir "c:\Dossier1\Dossier2\"
....
plutot soulant non ?... Surtout quand ca peut etre fait en 1 ligne

Source / Exemple :


Private Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" (ByVal lpPath As String) As Long
Private Sub Command1_Click()
MakeSureDirectoryPathExists "c:\Dossier1\Dossier2\Dossier3\Dossier4\Dossier5\Dossier6\"
End Sub

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.