event DropFiles (Folder as ExShellFolder, Effect as Long)
The user drags a collection of files over the control.

 TypeDescription 
   Folder as ExShellFolder An object reference to a Folder object.  
   Effect as Long A long integer that represents the desired drag-and-drop effect.  

This event occurs after the user drags and drops files into the control.   Folder is the target of the drag and drop operation.  Effect holds the desired effect of the drag and drop. Use the DropFilesCount property to count the files being dropped. Use the DropFilesPathName property to retrieve the path of the dropping folder. The DropFiles event is fired only if the AllowDropFiles property is True.

Here is a VB sample that lists the files dragged in the Immediate debugger window.

Private Sub ExFolderView1_DropFiles(ByVal ExShellFolder As EXFOLDERVIEWLibCtl.IExShellFolder, ByVal Effect As Long)
   Dim I As Long
   For I = 0 To FolderView1.DropFilesCount - 1
      Debug.Print FolderView1.DropFilesPathName(I)
   Next I
   If (Effect & 1) = 1 Then
      Debug.Print "Copied to " & Folder.PathName
   Else
      Debug.Print "Moved to " & Folder.PathName
   End If
End Sub
 


Send comments on this topic.
© 1999-2006 Exontrol Inc, Software. All rights reserved.