*当我尝试删除特定目录中的文件夹和文件时,没有删除...
我的代码:*
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Try
For Each temp_files In Directory.GetFiles("C:\Windows\Temp")
File.Delete(temp_files)
Next
For Each temp_folders In Directory.GetDirectories("C:\Windows\Temp")
Directory.Delete(temp_folders)
Next
For Each temp2_files In Directory.GetFiles("C:\Users\PEDROA~1\AppData\Local\Temp")
File.Delete(temp2_files)
Next
For Each temp2_folders In Directory.GetDirectories("C:\Users\PEDROA~1\AppData\Local\Temp")
Directory.Delete(temp2_folders)
Next
For Each pref_files In Directory.GetFiles("C:\Windows\Prefetch")
File.Delete(pref_files)
Next
For Each pref_folders In Directory.GetDirectories("C:\Windows\Prefetch")
Directory.Delete(pref_folders)
Next
Catch ex As Exception
End Try
End Sub
为什么我不能删除?
答案 0 :(得分:0)
您的问题是delete命令仅适用于空目录。删除内部的所有内容需要不同的重载。还要寻找许可/所有权问题。 Try / catch块可以帮助您控制可能遇到的错误。
For Each temp_folders In Directory.GetDirectories("C:\Windows\Temp")
Directory.Delete(temp_folders, true)
Next