Mensaje enviado por José Rubí de la Vega <jrubi@ctv.es>

Suponiendo que tenemos un listbox llamado list1, para poder arrastrar
ficheros desde el explorador :
- Ponemos su propiedad OLEDropMode = 1
- En el evento OLECompleteDrag ponemos : Effect = vbDropEffectCopy
- En el evento OLEDragDrop ponemos :
  Dim i As Long
  For i = 1 To Data.Files.Count
      List1.AddItem Data.Files(i)
  Next i
- En el evento OLEDragOver ponemos :
  If Data.GetFormat(vbCFFiles) Then
     Effect = vbDropEffectCopy
  Else
     Effect = vbDropEffectNone
  End If

Y ya esta ;-)

At 09:47 3/11/99 -0600, you wrote:
>Quiero desarrollar una aplicacion en Visual Basic que me permita utilizar
>los archivos que yo haya escogido utilizando el Explorer de Windows.

Un saludo.
_________________________________________________
José Rubí de la Vega
E-mail : jrubi@ctv.es
WWW : http://www.ctv.es/USERS/jrubi
Podrás encontrar información sobre VB, las listas vb-esp y visualbasic-esp y un
resumen de los mensajes de las mismas