Как перетащить файлы из Outlook, чтобы превзойти пользовательскую форму, используя древовидную структуру? - PullRequest
Новая
       19

Как перетащить файлы из Outlook, чтобы превзойти пользовательскую форму, используя древовидную структуру?

0 голосов
/ 26 апреля 2019

Я пытаюсь создать пользовательскую форму, которая включает в себя окно перетаскивания в пользовательской форме, которое не только извлекает данные из внешнего вида, но и извлекает несколько файлов.

Мне удалось добавить Treeview, и я могу перетаскивать файлы по одному со своего рабочего стола.

Я ввожу это в подпрограмму инициализации 

TreeView2.OLEDropMode = ccOLEDropManual

Я ввожу это для подпрограммы древовидной структуры 

Private Sub TreeView2_OLEDragDrop(Data As MSComctlLib.DataObject, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single)

StrPath = Data.Files(1)

If Me.FilePath1.Value = "" Then
Me.FilePath1.Value = StrPath
Else
If Me.FilePath2.Value = "" Then
Me.FilePath2.Value = StrPath
Else
If Me.FilePath3.Value = "" Then
Me.FilePath3.Value = StrPath
Else
If Me.FilePath4.Value = "" Then
Me.FilePath4.Value = StrPath

End If
End If
End If
End If

End Sub

введите описание изображения здесь

Однако я хочу иметь возможность перетаскивать несколько файлов в окно Treeview, чтобы заполнить несколько текстовых полей разными путями к файлам.Я также хочу иметь возможность перетаскивать из внешнего вида.Код должен был бы увидеть, был ли уже там путь, и заполнить пустые текстовые ячейки, или же путь к файлу был таким же.Тогда я могу просто возобновить ошибку, если они будут помещены во многие файлы.Спасибо за любую помощь, вы можете предоставить.

...