Сохранить перетаскиваемый (Drag & Grop) файл в директорию, с заменой имени, если существует - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Добрый день, Господа. Появилась задача. сохранить перетаскиваемый файл в директорию, с заменой названия файла. ( имя берем из ричбокса) В интернете мало инфы про drag&drop в принципе. Вот что нашел у нас на форуме, ну если честно, я даже не вижу где он здесь запрашивает путь. Вижу только формат, но почему он путь нам пишет, не понимаю. Повторюсь с задачей. Как бы сохранить перетаскиваемый файл, с заменой имени. Сама концепция какая. Заранее спасибо всем!
Листинг программы
  1. Private Sub Form1_DragDrop(sender As Object, e As DragEventArgs) Handles Me.DragDrop
  2. Dim file() As String = CType(e.Data.GetData(DataFormats.FileDrop), String())
  3. For I As Integer = 0 To file.Length - 1
  4. MsgBox(file(I))
  5. Next
  6.  
  7. End Sub
  8. Private Sub Form1_DragEnter(sender As Object, e As DragEventArgs) Handles Me.DragEnter
  9. If e.Data.GetDataPresent(DataFormats.FileDrop) Then
  10. e.Effect = DragDropEffects.Copy
  11. Else
  12. e.Effect = DragDropEffects.None
  13. End If
  14. End Sub
  15. End Class

Решение задачи: «Сохранить перетаскиваемый (Drag & Grop) файл в директорию, с заменой имени, если существует»

textual
Листинг программы
  1.         For I As Integer = 0 To file.Length - 1
  2.             System.IO.File.Copy(file(I), Path.GetDirectoryName(file(I)) & "\copy_" & Path.GetFileName(file(I)))
  3.             MsgBox(file(I))
  4.         Next

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 4.071 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы