VB.net 移动文件夹去另一个地址，删除文件夹里某种类型的文件

最新推荐文章于 2023-07-06 09:53:27 发布

Stephanie_0903

最新推荐文章于 2023-07-06 09:53:27 发布

阅读量1.5k

点赞数

分类专栏： # VB 文章标签： vb.net 文件夹文件

本文链接：https://blog.csdn.net/Stephanie_0903/article/details/104055268

版权

本文介绍了如何使用VB.NET进行文件夹移动操作，包括将包含内部文件和子文件夹的文件夹移动到另一路径，并删除特定类型文件。示例中展示了如何将起始名为'Encrypted_*'的文件夹及其内容移到目标路径，并删除.csv文件。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1. move one folder including inside files/folders to another path. 把一个文件夹及其里面的所有文件/文件夹移去另一个地址。

e.g.把最近一次的log文件夹SourceFolder下的所有起始位Encrypted_* 字样的文件夹，及其这些文件夹里的所有文件，移去收藏文件夹TargetFolder下的以当时时间命名的文件夹下。

把D:\Input\Encrypted_2020移去D:\Input\Archive\20200119_102905\Encrypted_2020

SourceFolder='D:\Input\'
TargetFolder='D:\Input\Archive\'
Dim IndividualSubFolderName As String = DateTime.Now.ToString("yyyyMMddHHmmss".Substring(0, 8)) + "_" + DateTime.Now.ToString("yyyyMMddHHmmss".Substring(8, 6))

If (Not System.IO.Directory.Exists(TargetFolder + IndividualSubFolderName)) Then
    System.IO.Directory.CreateDirectory(TargetFolder + IndividualSubFolderName)
End If

Dim SubDirs() As String
Dim i As Integer
SubDirs = Directory.GetDirectories(SourceFolder, "Encrypted_*")
For i = 0 To UBound(SubDirs)
    Dim Source As New DirectoryInfo

最低0.47元/天解锁文章