Sujet Précédent Sujet Suivant

FAIRE GLISSER UN OU PLUSIEUR FICHER DANS UNE LIST BOX

koubihack - 22 juin 2001 à 10:03
cs_RENAUD34 Messages postés 18 Date d'inscription lundi 17 mai 2004 Statut Membre Dernière intervention 4 octobre 2007 - 23 déc. 2009 à 11:49
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/1355-faire-glisser-un-ou-plusieur-ficher-dans-une-list-box
cs_RENAUD34 Messages postés 18 Date d'inscription lundi 17 mai 2004 Statut Membre Dernière intervention 4 octobre 2007
23 déc. 2009 à 11:49
trop simple. Je l'utilise avec une FileListBox ("Fl") pour copier des fichiers :

Private Sub FL_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim i As Integer

For i = 1 To Data.Files.count
FileCopy Data.Files.Item(i), FL.Path & "" & Dir(Data.Files.Item(i))
Next

FL.Refresh
End Sub
cs_Jin Messages postés 30 Date d'inscription mercredi 4 décembre 2002 Statut Membre Dernière intervention 1 février 2003
17 janv. 2003 à 12:09
c'est con. Mais qu'est que c'est bien. Comme on dit, il fallait y penser...
leptidev Messages postés 206 Date d'inscription mercredi 30 janvier 2002 Statut Membre Dernière intervention 4 décembre 2007
21 mars 2002 à 20:21
Salut, question hyperBete : c koi OLE ?????
cs_jackky Messages postés 50 Date d'inscription mardi 8 janvier 2002 Statut Membre Dernière intervention 6 juillet 2003
27 févr. 2002 à 08:47
salut comment faire pour qu'il load toute les fichier texte du repertoire ou il se trouve!
Warning
22 juin 2001 à 17:49
Merci, je le cherchais aussi !!!

ça tue !!!
CtHuLhU50
22 juin 2001 à 13:39
mais de rien ! g kand meme mis un chtit moment a le trouver c'te truc :)
Xlat
22 juin 2001 à 11:48
c'est souvent ce genre de truc simple que on loupe! :-)
perso ca fesai un moment que je me posais la question !
thx !
flint
22 juin 2001 à 11:10
merci 1000 fois
koubihack
22 juin 2001 à 10:03
ben le code est bon, court et simple a comprendre, je crois que tu as fais ta BA de la journée sur ce coup, cool :-)
@+
koub

Discussions similaires

Combo Box sur txt
Death Angel -
impact74 -

4 réponses
liste d'objet
zoot06 -
Bidou -

7 réponses
Charger une image dans un picturebox
Fildomen -
UnMec -

7 réponses
Retour à la ligne dans une text box
Nizam65 -
philippe laschweng 1 -

7 réponses
creer une fiche de vente
termitus19 -
Whismeril -

22 réponses
Rejoignez-nous