VB.NET拷贝整个目录下所有子目录及文件的实例代码
2013-07-24 00:00
746 查看
Public Sub CopyDerictory(ByVal DirectorySrc As DirectoryInfo, ByVal DirectoryDes As DirectoryInfo) Dim strDirectoryDesPath As String = DirectoryDes.FullName & "" & DirectorySrc.Name If Not Directory.Exists(strDirectoryDesPath) Then Directory.CreateDirectory(strDirectoryDesPath) End If Dim f, fs() As FileInfo fs = DirectorySrc.GetFiles() For Each f In fs File.Copy(f.FullName, strDirectoryDesPath & "" & f.Name, True) Next Dim DirSrc, Dirs() As DirectoryInfo Dirs = DirectorySrc.GetDirectories() // 递归调用自身 For Each DirSrc In Dirs Dim DirDes As New DirectoryInfo(strDirectoryDesPath) CopyDerictory(DirSrc, DirDes) Next End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click CopyDerictory(New DirectoryInfo("C:Documents and SettingsusernameFavorites"), New DirectoryInfo("g: emp")) End Sub
相关文章推荐
- VB.NET拷贝整个目录下所有子目录及文件的实例代码
- 获取某目录下的所有文件(包括子目录下文件)的数量(C#/VB.NET)
- 获取某目录下的所有文件(包括子目录下文件)的数量(C#/VB.NET)
- 拷贝整个目录下所有子目录及文件的方法
- C#中拷贝整个文件夹下的所有文件到指定目录
- 【代码】当前目录以及当前目录的所有子目录下查找文件名包含指定字符串的文件,并打印出绝对路径
- python 遍历目录(包括子目录)下所有文件的实例
- asp.net遍历目录文件夹和子目录所有文件
- php更改目录及子目录下所有的文件后缀的代码
- 【bat 实现功能】将当前目录内所有子目录中的文件拷贝到当前目录下
- vb实现获取指定目录内的所有文件(包括子目录)
- 续:C# 趣味小程序(4)——遍历特定目录及其子目录 (应用实例,压缩指定目录下的所有文件)
- VB.Net判断目录或文件是否存在的实例
- 遍历目录及子目录列出所有文件和文件夹的代码
- C#.NET中遍历指定目录下的文件(及所有子目录及子目录里更深层目录里的文件)
- C#遍历整个文件夹及子目录的文件代码,.Net技术文章,Asp.net系列教程,Asp.n...
- linxu命令之cp 拷贝整个目录下的所有文件
- python实例32[glob+rmtree来删除目录和子目录及其下所有文件]
- Linux下如何拷贝整个目录下的所有文件