drag & drop multiple files in form

[palomino5]

Hello!
i'm trying to drag & drop multiple files from the windows explorer into my form.
Now i can only do this with only one file; whem i select more files and i drag & drop them in my form i receive only one file.
Do you have any idea how i can do this?

Thank You!


Carlos Feliu

[Edgemeal]

Simple way is to use a listbox and drop the files on that.

Private Sub List1_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
        List1.AddItem Data.Files(i)
    Next i
End Sub

Private Sub Form_Load()
    List1.OLEDropMode = 1
End Sub