Как сделать несколько копий файлов
Когда я копирую выбранный элемент(ы) типа файла listview, а затем вставляю на рабочий стол, так что только 1 может вставить, но выбранный-это 3 элемента. как организовать цикл или массив элемент для многократного копирования.
Что я уже пробовал:
For Each lvi As ListViewItem In ListView1.SelectedItems For Each info2 In New DirectoryInfo(Me.dirPath).GetFiles(Conversions.ToString(Operators.ConcatenateObject(Operators.ConcatenateObject("*", lvi.Text), "*")), SearchOption.AllDirectories) Dim data As New DataObject() If File.Exists(info2.FullName) Then Try Dim DataObject As New DataObject Dim tempFileArray As New ArrayList tempFileArray.Add(Path.GetFullPath(info2.FullName)) DataObject.SetData(DataFormats.FileDrop, False, DirectCast(tempFileArray.ToArray(GetType(String)), String())) Clipboard.SetDataObject(DataObject) 'Dim data As New System.Collections.Specialized.StringCollection() 'data.Add(info2.FullName) 'Clipboard.SetFileDropList(data) Catch exception1 As Exception Dim ex As Exception = exception1 ProjectData.SetProjectError(ex) Interaction.MsgBox(ex.Message, MsgBoxStyle.ApplicationModal, Nothing) ProjectData.ClearProjectError() End Try End If Next Next