Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 06 14:57:07

SILVERLIGHT 3 : COMMUNICATION ET MULTICAST par KooKiz

[PERSO] DéCOUVERTES ESTIVALES : LINUX (PART I) par FREMYCOMPANY

[REFACTORING] RESHARPER POUR VISUAL STUDIO 2010 (PREVIEW) par tja

[REFACTORING] ANALYSER VOS EXCEPTIONS AVEC RESHARPER EXCEPTIONAL par tja

SHAREPOINT 2007 : PATTERNS & PRACTICES SHAREPOINT GUIDANCE par phil

RE : OBJET SORT, MéTHODE APPLY, ERREUR 1004 par kardiss

RE : PROBLEME DANS BASE DE DONNéES par Tursiop60

RE : LIRE DANS UN FICHIER CSV DE 170MO AVEC ACCESS par mmmxtina

RE : PROBLEME DANS BASE DE DONNéES par PCPT

RE : PROBLEME DANS BASE DE DONNéES par Tursiop60

+ de logiciels à télécharger

1 465 265 membres
317 nouveaux aujourd'hui
15 046 membres club

Trouver une ressource

Trouvez une ressource parmi 40 094 codes, 1 303 228 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

DRAG'N'DROP DE L'EXPLORATEUR VERS UNE LISTBOX

Information sur la source

Catégorie :Formulaire Niveau : Débutant Date de création : 03/06/2003 Date de mise à jour : 03/06/2003 10:39:43 Vu / téléchargé: 4 837 / 488

Auteur : goth

Ecrire un message privé

Note :

9,80 / 10

Commentaire sur cette source (14)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

tout est dit dans le titre...comment ajouter des fichiers dans une listbox depuis l'explorateur windows en utilisant le drag n drop

1 - mettre la propriété OLEDragMode de la list sur automatique
2 - mettre la propriété OLEDropMode de la list sur manuel

ensuite :

Source

Private Sub List1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim fichier As Variant
For Each fichier In Data.Files
List1.AddItem fichier
Next
End Sub

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

    Dim fichier As Variant
    
    For Each fichier In Data.Files
        List1.AddItem fichier
    Next

End Sub

Conclusion

et c'est parti comme en 14.
Bon c'est pas commenté mais je pense pas que ce soit grave

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

dragndrop
- Form1.frm 1 273 octets
- Projet1.vbp 633 octets
- Projet1.vbw 51 octets

Télécharger le zip

Sources du même auteur

XYLOPHONE ELECTRONQIUE - PROJET COMPLET

SYSTRAY AVEC INFO BULLE (AFFICHE ESPACE DISPO DES DISQUES)

GESTION DE RAPPELS

LANCER UN FICHIER AVEC SON PROGRAMME PAR DEFAUT SANS SHELLEX...

REDIRECTION DE LA CONSOLE VERS UNE TEXTBOX

Toutes les sources de goth

Sources de la même categorie

EDITEUR DE TEXTE WINFORM AVEC CORRECTEUR ORTHOGRAPHIQUE WPF par gillardg

MODIFIER L'OPACITÉ D'UN FORMULAIRE AU PASSAGE DE LA SOURIS par Arnal88

LOGICIEL BONS DE TRAVAUX par gnieark

AFFICHER UNE IMAGE DANS UNE CELLULE D'UN DATAGRIDVIEW LIÉ À ... par christcnet

FORM AVEC BOUTONS DYNAMIQUES SOUS VB6 par mimiZanzan

Toutes les sources de la catégorie Formulaire

Commentaires et avis

Commentaire de Saros le 03/06/2003 17:06:49

Salut ;
J'ai pas commpris un truc : pourquoi le For Each...Next ?
Un DataFile peut contenir plusieurs fichiers ?
Saros

Commentaire de devsurf le 03/06/2003 19:35:07

Comment pourrait on faire un drag un drop à partir d'une liste outlook?
Est ce possible de glisser un fichier mail dessus?
Merci

Commentaire de goth le 04/06/2003 10:44:07

Saros=>ce n'est pas un datafile mais un dataobject dont le nom est data. Les dataobject ont une propriété File qui est un tableau d'ou le for each
devdurf=>je viens d'essayer et a priori non...mais bon ya peut etre un truc a faire pour ke ca marche...

Commentaire de Mike3633 le 18/06/2003 23:36:43

salut,
voila g 1 probléme je cherche la méme chose mes pour 1 treeview
exemple: DRAG'N'DROP DE L'EXPLORATEUR VERS UN treeview
merci, pouvez vous méder, si oui me doner le code.

Commentaire de Mike3633 le 20/06/2003 13:19:26

salut,
voila g 1 probléme je cherche la méme chose mes pour 1 treeview
exemple: DRAG'N'DROP DE L'EXPLORATEUR VERS UN treeview, pouvez vous méder svp, merci.

Commentaire de leleader le 06/02/2004 21:49:00

Vraiment bien merci

Commentaire de jc_albator le 20/08/2004 11:28:32

C'est exactement ce que je cherchais
merci bien

Commentaire de MadM@tt le 12/02/2005 13:13:20

Exemple PARFAIT !
on ne peut pas faire mieux bravo, c'est simple, clair, concis... Et ça marche !

Commentaire de PierreAd le 11/10/2005 13:38:06

Bravo !!!

Enfin un exemple très simple pour le drag drop... Merci beaucoup, je ne savais pas trop par quel bout commencer le drag drop, now c'est parti !!!

Commentaire de charentonlepont le 15/05/2006 14:07:43

peut-on utiliser à partir d'access (2000) ? je n'est pas trouvé le contrôle ListBox avec les options DragAndDrop.

Commentaire de Vedlen le 16/05/2006 18:43:48

super :D

Commentaire de Renfield le 05/05/2007 04:43:28 administrateur CS

Ne fonctionne pas sous Vista

Commentaire de goth le 07/05/2007 10:15:11

hmmm...j'ai pas vista donc je peux pas tester et par conséquent corriger...mais c'est toujours bien de la savoir...
Si une ame charitable peut apporter les corrections pour la compatibilité, je suis sur que ca interessera du monde ^^

Commentaire de cymoud le 15/09/2007 14:36:59

c nikel, exactement ce que j'avais besoin, merci... cependant je mes 9/10 parce que la compatibilité Vista j'en ai besoin aussi car je vais bientot y migrer !