Hallo allemaal
Nog een ander vraagje nu
Ik heb op mijn formulier een label staan waar ik bestanden kan naar verslepen vanaf mijn windows explorer of bureaublad. Hierna komt het pad van het bestand in een listbox terecht.
Nu wil ik dit ook kunnen doen rechtstreeks uit een outlook mail.
dit lukt mij echter niet, ik moet de bijlage eerst opslaan. Maar ik wil wel degelijk rechtstreeks verslepen vanuit mijn mail.
Dit is de code die ik voorlopig al heb:
Alvast bedankt voor de feedback.
Nog een ander vraagje nu

Ik heb op mijn formulier een label staan waar ik bestanden kan naar verslepen vanaf mijn windows explorer of bureaublad. Hierna komt het pad van het bestand in een listbox terecht.
Nu wil ik dit ook kunnen doen rechtstreeks uit een outlook mail.
dit lukt mij echter niet, ik moet de bijlage eerst opslaan. Maar ik wil wel degelijk rechtstreeks verslepen vanuit mijn mail.
Dit is de code die ik voorlopig al heb:
Code:
'DRAG & DROP OFFERTE EN WEERGEVEN IN LIJST
Private Sub lbldropofferte_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles lbldropofferte.DragEnter
If e.Data.GetDataPresent(DataFormats.FileDrop) Then
e.Effect = DragDropEffects.Copy
Else
e.Effect = DragDropEffects.None
End If
End Sub
Private Sub lbldropofferte_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles lbldropofferte.DragDrop
Dim file_names As String() = DirectCast(e.Data.GetData(DataFormats.FileDrop), String())
For Each file_name As String In file_names
listbijlagen.Items.Add(file_name)
Next file_name
End Sub
Alvast bedankt voor de feedback.