VB 强制删除文件和文件夹

2024-11-17 07:31:02

推荐回答（1个）

回答1：

看看能够帮到你吧。。。。3个方法可以实现:
1:
kill 文件 '删除文件
rmdir 文件夹 '删除文件夹

如果想要使用 RmDir 来删除一个含有文件的目录或文件夹，则会发生错误。在试图删除目录或文件夹之前，先使用 Kill 语句来删除所有文件。

2:
或者用对象的方法:
Set fs = CreateObject("Scripting.FileSystemObject")
fs.deletefile 删除文件
fs.deletefolder 删除文件夹

3:
用API也可以办到
Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long

deletefile 文件名 '强制删除一个文件