MULTISELECT AVEC COMMONDIALOG

Badclown Messages postés 162 Date d'inscription jeudi 27 décembre 2001 Statut Membre Dernière intervention 22 mars 2004 - 9 janv. 2003 à 15:42
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 12 oct. 2007 à 08:07
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/5610-multiselect-avec-commondialog

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
12 oct. 2007 à 08:07
plein d'autres flags existent pour le ShowSave / ShowOpen

cherches cdlofn dans l'explorateur d'objets de VB (touche F2)
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
12 oct. 2007 à 08:06
utilises une autre boite de dialogue standard, pour selectionner un repertoire...

http://www.vbfrance.com/codes/SELECTION-DOSSIER-AVEC-BOUTON-NOUVEAU-DOSSIER_17270.aspx
pointbin Messages postés 71 Date d'inscription lundi 5 janvier 2004 Statut Membre Dernière intervention 13 mai 2010
11 oct. 2007 à 22:30
maintenent c'est plus claire, alors ce sont des variable predefini qui d'apres leurs nom donne une idée du fonctionnement.
pour le showSave est ce qu'il y a un moyen de sélectionner seulement le dossier ou je veux sauvegarder sans avoir a donner un nom de fichier.
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
11 oct. 2007 à 14:03
&h200 Or &h80000 ...
ou comment rendre du code obscur !

cdlOFNExplorer or cdlOFNAllowMultiselect est plus lisible, non ?
pointbin Messages postés 71 Date d'inscription lundi 5 janvier 2004 Statut Membre Dernière intervention 13 mai 2010
11 oct. 2007 à 12:54
ça aide beaucoup le
'Initialisation du commondialog
CommonDialog1.Flags = &H200 Or &H80000 'Permet le multiselect (200)
'et la boite de dialogue est de type explorateur (80000)
CommonDialog1.MaxFileSize = 32767
merci.
cs_nihaoma Messages postés 140 Date d'inscription jeudi 2 mai 2002 Statut Membre Dernière intervention 2 février 2010
10 août 2005 à 18:38
une ch'tite question....quelqu'un sait s'il existe une boite de dialogue commune (ou bien un flag sur le .ShowSave) qui permet d'enregistrer plusieurs fichiers dans un meme répertoire ?...en fait, que l'utilisateur ne voit pas le champ 'Nom du fichier' et 'Type de fichier' mais qu'il puisse choisir le lecteur et le dossier comme dans le .ShowSave.
(en fait le pourais simplement créer une Form avec un Drive et un FileList et ca marcherait très bien, mais bon si y'a un truc déja fait, pourquoi réinventer la roue ? lol

merci pour vos réponses
cs_noshelter Messages postés 11 Date d'inscription mercredi 26 février 2003 Statut Membre Dernière intervention 25 juin 2003
16 juin 2003 à 04:12
c'est juste le flags du multiselect qui m'intéressait, tu m'a rendu service, merci beaucoup.
cs_noshelter Messages postés 11 Date d'inscription mercredi 26 février 2003 Statut Membre Dernière intervention 25 juin 2003
16 juin 2003 à 03:58
c'est juste le flags du multiselect qui m'intéressait, tu m'a rendu service, merci beaucoup.
Sphaxs Messages postés 56 Date d'inscription mardi 18 juin 2002 Statut Membre Dernière intervention 27 mars 2009 1
15 janv. 2003 à 19:15
A vrai dire, c'est pour ça que je l'ai ecrit ce code (en réalité c'est pas un lecteur MP3 mais un lecteur utilisant windows media player (qui lit les MP3, les WAV, les MPEG, ...) mais je ne l'ai pas encore mis sur VBFrance (il reste quelques améliorations à apporter) mais s'il interresse quelqu'un, je peux le mettre... (notamment si ca interresse quelqu'un de le rendre plus "joli" car le graphisme ce n'est pas mon truc du tout ...)
A+
Sphaxs
DebvbJ Messages postés 54 Date d'inscription mercredi 19 juin 2002 Statut Membre Dernière intervention 14 février 2003
14 janv. 2003 à 19:42
Ca peut-être utile pour un lecteur mp3 par exemple LordBob
Exemple : winamp permet le multi-select en ajout de fichier donc ça peut servir plutôt que d'ajouter un par un des fichiers (c'est juste un exemple)
cs_LordBob Messages postés 2865 Date d'inscription samedi 2 novembre 2002 Statut Membre Dernière intervention 11 mai 2009 9
9 janv. 2003 à 19:27
c pas trop compris l'interet de ta source... ou plutot ce kel fait...
VicoLaChips2 Messages postés 436 Date d'inscription dimanche 20 janvier 2002 Statut Membre Dernière intervention 2 février 2010 2
9 janv. 2003 à 16:22
Salut !
Il y a + simple -:)
Private Sub Command1_Click()
Dim sPathRacine As String, sFiles() As String
CommonDialog1.ShowOpen
sFiles = Split(CommonDialog1.FileName, vbNullChar)
If UBound(sFiles) > 0 Then 'plusieurs fichiers

sPathRacine = sFiles(0) & ""
MsgBox sFiles(1)
Else 'un seul fichier contenant
'racine et nom...
MsgBox sFiles(0)
End If
End Sub
@+, VIC
Badclown Messages postés 162 Date d'inscription jeudi 27 décembre 2001 Statut Membre Dernière intervention 22 mars 2004
9 janv. 2003 à 15:42
Je pense pas que il y est plus simple, mais tu aurais pu detailler toute les options de "Flags" car il y a pas mal de chose interressante :)
Rejoignez-nous