begin process at 2012 02 13 20:53:18
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

API

 > CRÉER UN DOSSIER (OU SOUS DOSSIER)

CRÉER UN DOSSIER (OU SOUS DOSSIER)


 Information sur la source

Note :
9,58 / 10 - par 12 personnes
9,58 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :API Niveau :Débutant Date de création :12/12/2002 Date de mise à jour :12/12/2002 11:02:45 Vu :10 304

Auteur : BasicInstinct

Ecrire un message privé
Commentaire sur cette source (19)
Ajouter un commentaire et/ou une note

 Description

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\D ossier5\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

  • 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
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



 Sources du même auteur

Source avec Zip Source avec une capture SCRIPTING D'APPLICATION (COMME LES MACRO SOUS OFFICE)
Source avec Zip Source avec une capture LISTER LES ECRANS ET LEURS RÉSOLUTIONS
Source avec Zip BOUCLE INFINIE OU COMMENT FAIRE UN TIMER >65500 MS
SCROLLBAR AJOUTÉ A 1 CONTROLE
Source avec Zip CHOISIR L'IMPRIMANTE DANS ACCESS (VBA)

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) .NET DEPENDENCY VIEWER : ARBRE DES DÉPENDANCES D'UN ASSEMBLY... par ShareVB
Source avec Zip Source .NET (Dotnet) UTILITAIRE SKYDRIVE par MasterShadows
Source avec Zip ROTATION RAPIDE D'IMAGE par trex70
Source avec Zip Source avec une capture ENUMERATION DES PORTS TCP ET IDENTIFCATION DU PROCESS (PID) ... par Renfield
Source avec Zip Source avec une capture MOUSE SPEED AND WEIGHT : RETOUR DE FORCE VIRTUEL ! par ScSami

Commentaires et avis

Commentaire de Badclown le 12/12/2002 11:15:50

Joli :-)

Commentaire de BasicInstinct le 12/12/2002 12:37:27

je sais pas si c'est joli, mais en tout cas c'est super pratique!

Commentaire de BasicInstinct le 12/12/2002 12:38:49

je sais pas si c'est joli, mais en tout cas c'est super pratique!

Commentaire de DHKold le 12/12/2002 13:13:41

C'est vrai que c'est utile, aller... 10/10

Commentaire de devsurf le 13/12/2002 22:26:16

Impresionnant!
Do sort cette dll? Est ce une dll  standard windows?

Commentaire de frawid le 15/12/2002 15:02:46

Un truc supper pratique, merci pour ta bonne 'codes sources' 10/10

Commentaire de BasicInstinct le 16/12/2002 09:19:06

de base dans windows, je sais pas, mais de base avec vb c'est sur :))

Commentaire de Play02man1 le 25/12/2003 09:52:42

nikel big thx ;)

Commentaire de c00ol le 13/03/2004 11:33:05

GG,10/10 jconnaissai pas sa mai c cour et geniale

Commentaire de fifipil909 le 30/08/2005 19:46:03

nikel, cette petite API s'implifie la vie

Merci

Commentaire de ZLASSI le 05/07/2007 15:47:10

:-) un truc trés pratique
Merci

Commentaire de thierylaurent le 11/06/2008 15:49:16

désolé mais sa marche pas ton truc sa ne creer pas de dosier quel arnaque

Commentaire de BasicInstinct le 12/06/2008 11:33:20

ah ? bien sur que ca marche. tu as du faire une erreur dans ton code.

Commentaire de thierylaurent le 12/06/2008 16:34:31

pourtant j'ai fait un copier coller de ton code et sa ne marche pas sous quel vb tu l'utilise moi j'ai vb.2005 et vb 2008 je ne l'ai tester que sur 2008 mais sur 2005 sa doit être pareil

Commentaire de BasicInstinct le 12/06/2008 17:21:14

forcement, c'est du vb6...

en VB.net (2005) ça s'écrit comme ça :        
System.IO.Directory.CreateDirectory("c:\test1\test2\test3\test4\test5\")

Commentaire de kokise le 11/08/2008 10:19:05 10/10

Super cela m'a éviter 2 lignes de codes en plus je ne suis plus obligé de gérer l'exception de : si le dossier existe déjà. Merci

Commentaire de Graxy le 30/03/2009 22:42:38

Super !! Je cherchais tout pile ce code pour faire de l'archivage. J'ai tester MKdir le tien est mieux ;)

Merci beaucoup !

Commentaire de Renfield le 30/03/2009 23:45:50 administrateur CS

Astuce toute bête:

Public Declare Function MkDir  Lib "imagehlp.dll" Alias "MakeSureDirectoryPathExists" (ByVal lpPath As String) As Long

et hop!
l'instruction MkDir de VB redéfinie...

Commentaire de Amisnoob le 26/01/2010 00:37:43 10/10

Très utile

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,527 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales