如何将剪贴板中的文件粘贴到特定路径

Question

如何从剪贴板粘贴文件到我的路径？ 我在 VB .NET 中工作。 我从剪贴板获得文件名，但不知道如何从剪贴板中提取文件并将其保存到我的文件夹中。

  Dim data As IDataObject = Clipboard.GetDataObject()
  If data.GetDataPresent(DataFormats.FileDrop) Then
     Dim files As String() = data.GetData(DataFormats.FileDrop)
  End If

有谁能够帮我？ 提前致谢！

Answer 1

您可以使用Path类来隔离文件名并创建要在文件复制操作中使用的新文件的路径：

Dim data As IDataObject = Clipboard.GetDataObject
If data.GetDataPresent(DataFormats.FileDrop) Then
  For Each s As String In data.GetData(DataFormats.FileDrop)
    Dim newFile As String = Path.Combine("c:\mynewpath", Path.GetFileName(s))
    File.Copy(s, newFile)
  Next
End If

示例需要错误检查。

Answer 2

您还可以按如下方式获取文件的完整路径：

Dim objeto As IDataObject = Clipboard.GetDataObject
For Each data As String In objeto.GetData(DataFormats.FileDrop)
    ...
    Dim newFile As String = Path.GetFullPath(data.ToString)
    ...
Next