begin process at 2012 02 14 03:21:49
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Trucs & Astuces

 > VB.NET : DRAG & DROP DE FICHIER 'PAR EXEMPLE DEPUIS LE BUREAU OU L'EXPLORER'

VB.NET : DRAG & DROP DE FICHIER 'PAR EXEMPLE DEPUIS LE BUREAU OU L'EXPLORER'


 Information sur la source

Note :
9,63 / 10 - par 8 personnes
9,63 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Trucs & Astuces Source .NET ( DotNet ) Classé sous :drag, drop, dotnet, fichier Niveau :Débutant Date de création :24/05/2004 Date de mise à jour :24/05/2004 22:27:50 Vu / téléchargé :21 222 / 1 223

Auteur : Alain Proviste

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (13)
Ajouter un commentaire et/ou une note


 Description

bah c dans le titre non ?

Source

  • Private Sub frmSample_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  • 'Autorise le drag & drop sur le controle
  • lstTarget.AllowDrop = True
  • End Sub
  • Private Sub lstTarget_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles lstTarget.DragEnter
  • 'Si le drop en question est un drop de fichiers,
  • If e.Data.GetDataPresent(DataFormats.FileDrop) Then
  • ' alors on accepte le drop sous forme de copyDrop
  • e.Effect = DragDropEffects.Copy
  • Else 'sinon
  • 'on accepte pas
  • e.Effect = DragDropEffects.None
  • End If
  • End Sub
  • Private Sub lstTarget_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles lstTarget.DragDrop
  • Dim strFiles() As String
  • 'Variable qui contiendra un tableau contenant les fichiers
  • Dim i As Long 'Variable boucle
  • 'on recupere le drop dans le tableau
  • strFiles = e.Data.GetData(DataFormats.FileDrop)
  • For i = 0 To strFiles.GetUpperBound(0)
  • lstTarget.Items.Add(strFiles(i))
  • Next
  • End Sub
    Private Sub frmSample_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Autorise le drag & drop sur le controle
        lstTarget.AllowDrop = True
    End Sub

    Private Sub lstTarget_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles lstTarget.DragEnter
        'Si le drop en question est un drop de fichiers,
        If e.Data.GetDataPresent(DataFormats.FileDrop) Then
            ' alors on accepte le drop sous forme de copyDrop 
            e.Effect = DragDropEffects.Copy
        Else 'sinon
            'on accepte pas
            e.Effect = DragDropEffects.None
        End If
    End Sub

    Private Sub lstTarget_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles lstTarget.DragDrop

        Dim strFiles() As String
        'Variable qui contiendra un tableau contenant les fichiers
        Dim i As Long 'Variable boucle

        'on recupere le drop dans le tableau
        strFiles = e.Data.GetData(DataFormats.FileDrop)

        For i = 0 To strFiles.GetUpperBound(0)
            lstTarget.Items.Add(strFiles(i))
        Next


    End Sub


 Conclusion

si ca me pete et si vous insistez je ferais mieux , tous les drag & drop possibles, image, texte, wav et tout et tout
Là c'est juste pour dépanner une patate donc...

a+

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source .NET (Dotnet) SAVOIR SI UNE FENETRE EST VISIBLE DANS LA BARRE DE TACHE ( ....
Source avec Zip TUTORIAL VB6 : UN CARNET D'ADRESSE / REPERTOIRE TELEPHONIQUE
Source .NET (Dotnet) EXECUTER EN TANT QUE EN .NET
Source .NET (Dotnet) FONCTION D'ACKERMAN
Source .NET (Dotnet) TUTO VB.NET : SUPPRIMER UNE LIGNE DANS UN FICHIER

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) EXPORTER LES IMAGES DE WORD ET D' EXCEL par Le Pivert
Source avec Zip Source avec une capture JEUX DE VERITÉ ET DE FIDELITÉ par billatosco
Source avec Zip IMAGELOARDER par vkitumaini
Source avec Zip Source avec une capture Source .NET (Dotnet) CREER UN CALENDRIER DE POCHE par Le Pivert
Source avec Zip RECHERCHE D'UN ENREGISTREMENT DANS UNE DATATABLE ET POSITION... par erdna

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture Source .NET (Dotnet) TREEVIEW EXTENDED par bigboss9
Source avec Zip Source avec une capture Source .NET (Dotnet) VBFILEFIND : RECHERCHE DE FICHIERS POUR REMPLACER CELLE DE W... par Patrice99
Source avec Zip DRAG AND DROP LISTVIEW par lucienassaillit
Source avec Zip DRAG DROP DE FICHIERS DEPUIS UNE LISTVIEW par jack
Source avec Zip Source avec une capture DRAG & DROP D'UN FICHIER ET EXTRACTION DU NOM ET DU CHEMIN par NoFutur

Commentaires et avis

Commentaire de guizmo123 le 30/05/2004 16:19:25

Bravo pour la source !!!!!
Ce qui aurait été mortel quand même, ce serait de voir uniquement le nom du fichier apparaître dans la liste plutôt que le nom entier du chemin......

++

Commentaire de spy166 le 30/05/2004 21:23:14

guizmo -->   IO.Path.GetFileName(path As String)

Commentaire de leka le 06/06/2004 13:06:56

Pas mal, mais tu te complique un peu la vie pour lstTarget_DragDrop.

Une boucle For Each me parrait plus Appropriée et rapide.

        Dim PassedFile As String
        For Each PassedFile In e.Data.GetData(DataFormats.FileDrop)
            lstTarget.Items.Add(PassedFile)
        Next

C'est mieux non ? :-)

Commentaire de milo2009 le 31/08/2005 16:10:09

Je te remercie de ton mon coeur de programmeur.

J'ai passée des heures a chercher le drag & drop sous vb.net

meme dans le forum, il ne te dise pas comment faire en vb.net

pour les different types je me debrouillerai maintenant que j'ai comrpis le truc

Commentaire de cesdejong le 23/10/2005 14:40:18

C'est exactement ce que je recherche, enfin presque, enfin ce serait exactement ça si on pouvait l'appliquer à une feuille excel : glisser déposer un dossier sur cette feuille afin de récupérer le nom du dossier.
Si qqn a une idée.

Commentaire de Warz le 08/11/2005 18:33:32

Même tarif mais pour recuperer un path dans une Textbox ( ou autre ) d'un formulaire access 2000. Tu as une astuce ?

Commentaire de ocivecho le 02/12/2005 09:48:24

salut, j'ai un truc bien complexe à faire concernant le drag & drop, j'ai un ocx sous vb6 et je refais un programme l'utilisant en .net.
>>le gros problème, c'est que je n'ai plus les événements de dragenter, over ,drop puisque ça ne marche plus pareil en .net.
comment puis-je recréer les événements pour exploiter des fonctionnalités de glisser déposer?
ocivecho

Commentaire de chris81 le 21/06/2007 10:41:17

merci pour ce bout de code

Commentaire de 4t0m!k le 12/02/2008 15:20:59 10/10

Merci beaucoup pour ce code simple et très utile

Commentaire de alosamoelle le 22/02/2008 19:57:52 10/10

Exactement ce que je voulais.

Commentaire de Arnal88 le 12/05/2008 22:00:22

Merci pour ce petit bout de code rikiki comme tout mais qui rend un grand service !
C'est simple et ça va à l'essentiel. C'est exactement ce que je cherchais !

Continuez à mettre des petits bouts de code comme ça ! Ca fait gagner un temps fou !

Commentaire de mahikan le 19/06/2008 19:02:23

Salut

Est-il possible d'avoir la même chose mais pour des icone sur un Tabcontrol .

J'explique

mettre des icône sur une table control genre classeur d'icône par différentes catégories .

Merci

Commentaire de DxShadow le 29/04/2010 01:32:47 10/10

Merci beaucoup !

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Drag'n drop d'un fichier depuis listview vers winamp (ou autre) [ par Jenlain62 ] en gros je veux pouvoir faire un glisser-déposer d'un fichier mp3 vers la playlist de winamp comme on peut le faire depuis l'explorateur sauf ke moa j Drag drop un fichier JPG [ par mrpheus ] Bonjour,Je m'explique, je fait programme j'aimerai dans ce programme y inclure une photo jpg prix avec une web cam, je n'arrive pas a ce que la photo Drag drop un fichier JPG [ par mrpheus ] Bonjour,Je m'explique, je fait programme j'aimerai dans ce programme y inclure une photo jpg prix avec une web cam, je n'arrive pas a ce que la photo Drag and drop [ par Rockit72 ] Salut a tous,Je voudrais faire un programme qui lance notepad et ouvre un fichier texte automatiquement.En fait mon idee est de pouvoir faire un drag drag and drop de fichier [ par poulp ] Je cherche a copier un fichier d'une page web sur mon disk dur ou dans une application simplement par l'intermédiaire du drag and drop. Par exemple j' Drag'n drop pour ouvrir un fichier texte [ par LGEJ_LePsy666 ] Bonjour,Bah je crois que le titre du sujet parle de lui même, je cherche à faire une boite de texte (de préférence en RichText) qui permettrai d'ouvri Drag'n drop pour ouvrir un fichier texte [ par LGEJ_LePsy666 ] Bonjour,Bah je crois que le titre du sujet parle de lui même, je cherche à faire une boite de texte (de préférence en RichText) qui permettrai d'ouvri drag&drop d'un fichier sur un classeur excel [ par cesdejong ] bonjour,j'ai un classeur excel et une macro qui demandent un fichier d'entrée. Je souhaiterais pouvoir faire un drag&drop du fichier d'e drag and drop d'un fichier [ par Sparks_hevs ] Bonjours à tous,J'ai un programme qui traite des fichiers texte, pour l'instant je suis obligé de faire un parcourir pour ouvrir mon fichier.Quelque u Récupérer le nom d'un fichier par Drag&drop dans Excel 2000 [ par L_Stout ] Bonjour,Je fais une macro qui à besoin d'un nom de fichier en entrée. Et je souhaite que l'utilisateur puisse lancer la macro directement en


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
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 : 1,014 sec (4)

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