vb.net - 复制具有特定扩展名的所有文件

Question

您好，我想复制带有特定扩展名的所有文件。我已经尝试了一些东西，但它不起作用。在调试期间，我收到一个异常“路径中使用了非法字符”，我猜它不喜欢 *.xls 有什么建议吗？

第一次尝试

 My.Computer.FileSystem.CopyFile("C:\test\test\mxw\*.xls\", "C:\workorder1-23\workorder1-23\mxw\", True)

第二次尝试

For Each f In Directory.GetFiles("C:\test\test\mxw\*.xls\", CStr(SearchOption.AllDirectories))
     If My.Computer.FileSystem.FileExists(f.ToString) Then
          File.Copy("C:\test\test\mxw\*.xls\", "C:\workorder1-23\workorder1-23\mxw\", True)
     End If
Next

Answer 1

CopyFile 只复制一个文件。
您不能将它与通配符一起使用来复制一组文件。 (无效字符可能是通配符)
并且您不应在文件末尾附加反斜杠。

所以让我尝试用这个替换你的代码

For Each f In Directory.GetFiles("C:\test\test\mxw", "*.xls", SearchOption.AllDirectories)
     If File.Exists(f) Then
          File.Copy(f, Path.Combine("C:\workorder1-23\workorder1-23\mxw", Path.GetFileName(f)), True)
     End If
Next

还有 Directory.GetFiles有三个参数，一个路径，一个模式和一个读取子文件夹的标志