Suite a la question de milo2009 sur le forum de VbFrance, j'ai decidé d'ecrire un code d'exemple...
Source / Exemple :
Private Sub Command1_Click()
' Variable pour le dossier à créer
Dossier = Dir1.Path & "\" & Text1.Text
'Cré le dossier
MkDir Dossier
'Indique que le dossier a bien été créé
MsgBox "Le dossier a été créé avec succès."
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive ' Affiche le contenue du lecteur selectionné
End Sub
Conclusion :
code qui n'a rien d'exeptionnel, mais qui peut servir aux debutants...
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.