【求助】VB.NET遍历文件和文件夹遇到权限问题

greatbody greatbody 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
如下代码:
Sub GetFiles(ByVal ParentFolder As String)

Dim sFolders(), sFiles() As String
sFolders = IO.Directory.GetDirectories(ParentFolder)
For Each sFolder As String In sFolders
GetFiles(sFolder)
'Call AddPath("dir", sFolder)
Debug.Print(sFolder)
Application.DoEvents()
Next
sFiles = IO.Directory.GetFiles(ParentFolder)
For Each sFile As String In sFiles
Debug.Print(sFile)
'AddPath("file", sFile)
'lgCount = lgCount + 1
Application.DoEvents()
Next
End Sub

其它文件都没问题,在C盘进行遍历的时候,却出现问题。说是无权限。
而让我无语的是,VB6.0写的一个程序,可以顺利的遍历所有文件,包括.NET无法遍历的文件
当我把这个VB6.0的代码转到VB.NET中,且修改了VB和VB.NET中的语法差别后,发现,在VB6.0中运行无误的程序在VB.NET中却无法正常运行,总是遇到权限问题。

求高手帮忙解决。
...全文

相关推荐

评论 5
收藏 已收藏
分享
返回顶部
greatbody
VB 16,718 成员 110,520 内容