读书人

请教一下怎么解决My.Computer.FileSys

发布时间: 2011-12-10 00:07:34 作者: rapoo

请教一下如何解决My.Computer.FileSystem.GetFiles终于到的权限问题
我想实现删除系统盘里面的所有.log文件
[code]
Dim files As System.Collections.ObjectModel.ReadOnlyCollection(Of String)
files = My.Computer.FileSystem.GetFiles(System.Environment.SystemDirectory, FileIO.SearchOption.SearchAllSubDirectories, "*.log ")
ProgressBar1.Maximum = files.Count
Dim i As Int16
For Each strfile As String In files
i += 1
ProgressBar1.Value = i
My.Computer.FileSystem.DeleteFile(strfile)
Next
MessageBox.Show( "操作完成 ")
End Sub

[/code]

但是搜索到某些文件的时候会报错 Access to the path 'C:\Windows\System32\LogFiles\WMI\RtBackup ' is denied.

如何跳过这些不具有访问权限的文件


[解决办法]
可以用API
但是具体我也不知道
[解决办法]
可以先用GetDirectories搜索,对那些可以访问的文件夹再使用GetFiles,对不能访问的就跳过,或者用AccessControl来添加权限……

读书人网 >VB Dotnet

热点推荐