Drag and Drop E-mail from Outlook to Listbox

[Kaiserr2]

Does anyone have any idea of how to drag an e-mail from Outlook or Outllok Express over a list box in a VB application and copy the .msg file into the listbox?

Are there any Active X controls that would support that kind of operation?

 

[Kaiserr2]

Never found a way how to do it.

The closest thing I could find was to drag and drop the message on to the desktop - and then from windows explorer drag and drop it into the list box. From there you had one or two options:

Option one was to actually copy the file itself and the other option was to copy the text from the email.

 

[Hypetia]

Start a new VB project. Put a textbox on your form and set its properties as under.

[tt]MultiLine = True
OLEDropMode = 1[/tt] (Manual)

Put the following code in your form.
___
[tt]
Private Sub Form_Resize()
Text1.Move 0, 0, ScaleWidth, ScaleHeight
End Sub

Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Data.GetFormat(vbCFText) Then Text1 = Data.GetData(vbCFText)
End Sub[/tt]
___

Now run the program and drag-drop a message from Outlook to your textbox, the contents of the message will be captured directly in the textbox.

Checked with Outlook Express and its working fine.