从子文件夹中移动 PDF 文件并重命名它

Question

我是stackoverflow论坛的新手，所以请原谅我。这就是我要做的。我在两个子文件夹中有一个.pdf文件，例如：\edm\4123\gfh 在 gfh 目录中有一个.pdf文件。我需要能够获取此PDF文件，重命名它，并将其复制到根目录（\edm）我正在使用Visual Studio 2013，这是我从哪里开始的（我在网上找到的一些代码）

选项显式打开

Sub ListFiles()
    Dim objFSO As Scripting.FileSystemObject
    Dim objTopFolder As Scripting.Folder
    Dim strTopFolderName As String

    strTopFolderName = "\10.30.5.249edmburstingOlympus"
    SetAttr objFSO - CreateObject (Scripting.FileSystemObject)"

任何帮助将不胜感激 - 另外，我正在模块上输入此代码，正确吗？

这是我现在使用的代码：

模块模块1

Sub Main()
    For Each foundFile As String In My.Computer.FileSystem.GetFiles(
        "\10.30.5.249edmfilesOlympus",
Microsoft.VisualBasic.FileIO.SearchOption.SearchAllSubDirectories, "*.pdf*")
        My.Computer.FileSystem.MoveFile()

    Next
End Sub

终端模块

当我尝试将文件（变量：foundFile）移动到某个位置时，我遇到了问题。有什么想法吗？

Answer 1

Yoy 可以使用 File.Copy（）

System.IO.File.Copy("edm4123gfhFILE.pdf", "edmFILERENAMED.pdf")