我想刪除文件,如果它包含一個詞。我可以找到文件,如果它包含指定的字,刪除名稱中包含字符串的文件
Dim paths() As String = IO.Directory.GetFiles(%AppData% & "\etc\", "*chrome*")
If paths.Length > 0 Then
' Delete file?
End If
什麼是刪除文件的正確方法?
我想刪除文件,如果它包含一個詞。我可以找到文件,如果它包含指定的字,刪除名稱中包含字符串的文件
Dim paths() As String = IO.Directory.GetFiles(%AppData% & "\etc\", "*chrome*")
If paths.Length > 0 Then
' Delete file?
End If
什麼是刪除文件的正確方法?
這應該工作:
Dim path = IO.Path.Combine(
Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData),
"etc")
Dim filter = "chrome"
Dim files =
From fl In IO.Directory.GetFiles(path)
Where fl.Contains(filter)
Select fl
For Each fl In files
IO.File.Delete(fl)
Next
+1有點矯枉過正,但至少與通常的方法不同 – Steve 2014-10-17 20:41:12
有語法錯誤> http://i.snag.gy/6Fm7N.jpg – user198989 2014-10-17 20:41:32
我的不好,更新了代碼! – 2014-10-17 20:44:45
嘗試類似這樣的事情。 首先你需要有DirectoryInfo,從那裏你需要搜索&刪除。
For Each file In New DirectoryInfo(Environment.SpecialFolder.ApplicationData).GetFiles("*chrome*")
file.Delete()
Next
不錯的做法,但給這個問題> http://i.snag.gy/iZody.jpg – user198989 2014-10-17 20:38:57
只是更新了代碼。 – NMK 2014-10-17 20:59:08
這就是犯規編譯做它 – Plutonix 2014-10-17 20:26:14
這告訴如果有一個文件包含的單詞。但不幸的是,我不知道如何刪除它。 – user198989 2014-10-17 20:31:32
請使用directoryInfo而不是DirectoryInfo – NMK 2014-10-17 20:41:21