VB.Net如何实现复制、删除文件
发表于:2024-10-01 作者:千家信息网编辑
千家信息网最后更新 2024年10月01日,这篇文章主要为大家展示了"VB.Net如何实现复制、删除文件",内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下"VB.Net如何实现复制、删除文件"这篇文章吧。
千家信息网最后更新 2024年10月01日VB.Net如何实现复制、删除文件
这篇文章主要为大家展示了"VB.Net如何实现复制、删除文件",内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下"VB.Net如何实现复制、删除文件"这篇文章吧。
VB.Net语言 复制、删除文件代码:
Imports System.IO Imports System.IO.Directory ' ====================================================== ' 实现一个静态方法将指定文件夹下面的所有内容copy到目标文件夹下面 ' 如果目标文件夹为只读属性就会报错。 ' ====================================================== Public Shared Sub CopyDir(ByVal srcPath As String, ByVal aimPath As String) Try ' 检查目标目录是否以目录分割字符\结束,如果不是则添加之 If aimPath(aimPath.Length - 1) <> Path.DirectorySeparatorChar Then aimPath += Path.DirectorySeparatorChar End If '判断源目录是否存在,不存在则退出. If (Not Directory.Exists(srcPath)) Then Exit Sub ' 判断目标目录是否存在如果不存在则新建之 If (Not Directory.Exists(aimPath)) Then Directory.CreateDirectory(aimPath) ' 得到源目录的文件列表,该里面是包含文件以及目录路径的一个数组 ' 如果你指向copy目标文件下面的文件而不包含目录请使用下面的方法 ' string[] fileList = Directory.GetFiles(srcPath); Dim fileList() As String = Directory.GetFileSystemEntries(srcPath) ' 遍历所有的文件和目录 For Each FileName As String In fileList ' 先当作目录处理如果存在这个目录就递归Copy该目录下面的文件 If Directory.Exists(FileName) Then CopyDir(FileName, aimPath + Path.GetFileName(FileName)) ' 否则直接Copy文件 Else File.Copy(FileName, aimPath + Path.GetFileName(FileName), True) End If Next Catch ex As Exception MessageBox.Show(ex.ToString()) End Try End Sub ' ====================================================== ' 实现一个静态方法将指定文件夹下面的所有内容Detele ' 测试的时候要小心*作,删除之后无法恢复。 ' ====================================================== Public Shared Sub DeleteDir(ByVal aimPath As String) Try ' 检查目标目录是否以目录分割字符结束如果不是则添加之 If (aimPath(aimPath.Length - 1) <> Path.DirectorySeparatorChar) Then aimPath += Path.DirectorySeparatorChar End If '判断待删除的目录是否存在,不存在则退出. If (Not Directory.Exists(aimPath)) Then Exit Sub ' 得到源目录的文件列表,该里面是包含文件以及目录路径的一个数组 ' 如果你指向Delete目标文件下面的文件而不包含目录请使用下面的方法 ' string[] fileList = Directory.GetFiles(aimPath); Dim fileList() As String = Directory.GetFileSystemEntries(aimPath) ' 遍历所有的文件和目录 For Each FileName As String In fileList If (Directory.Exists(FileName)) Then ' 先当作目录处理如果存在这个目录就递归Delete该目录下面的文件 DeleteDir(aimPath + Path.GetFileName(FileName)) Else ' 否则直接Delete文件 File.Delete(aimPath + Path.GetFileName(FileName)) End If Next '删除文件夹 System.IO.Directory.Delete(aimPath, True) Catch ex As Exception MessageBox.Show(ex.ToString()) End Try End Sub
以上是"VB.Net如何实现复制、删除文件"这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注行业资讯频道!
文件
目录
面的
目标
内容
文件夹
方法
源目录
篇文章
字符
指向
数组
路径
静态
递归
处理
学习
帮助
检查
代码
数据库的安全要保护哪些东西
数据库安全各自的含义是什么
生产安全数据库录入
数据库的安全性及管理
数据库安全策略包含哪些
海淀数据库安全审计系统
建立农村房屋安全信息数据库
易用的数据库客户端支持安全管理
连接数据库失败ssl安全错误
数据库的锁怎样保障安全
戴尔服务器音频插座在哪里
山东小橙网络技术
邯郸项目软件开发需要多少钱
网络技术工程师是做什么
网络安全法3年以上
设计公司如何用服务器实现备份
数据库输入一月到10月的日期
日本sdbs光谱数据库官网
命运2服务器稳定吗
判断+主键+重复数据库
互联网大会科技成果选拔标准
雅安国家网络安全宣传
怎么给服务器添加gpu
jdbc连接多个数据库
智能穿戴技术软件开发技术
网络安全架构简介
filecoin服务器
客户机服务器系统的优缺点
服务器机柜行业代理申请
网络安全学习pdf
晶彩网络技术有限公司
现代通信网络技术论述
软件开发从业
徐汇区工业软件开发生产过程
宁波常用网络技术诚信为本
数据库约束pk和fk是什么
oracle数据库备份恢复
网络安全架构简介
网络安全学习pdf
合肥爱房网络技术