Hello, could make a drag and drop on a folder and get to know the fate of this folder to open a file in binary form.
if I use this method
is necessary that the file already exists (ListView1.ListItems (i). Tag) but this makes me unable to continue modifying.Code:Private Sub ListView1_OLEStartDrag(Data As ComctlLib.DataObject, AllowedEffects As Long) Dim i As Long For i = 1 To ListView1.ListItems.Count If ListView1.ListItems.Item(i).Selected = True Then Data.Files.Add ListView1.ListItems(i).Tag Data.SetData , vbCFFiles End If Next End Sub
I NEEDS is to create it after doing the drag and drop.
Is this possible?




Reply With Quote