vb 自动删除日志

来源：百度知道 编辑：UC知道 时间：2024/06/05 20:43:35
程序在D盘自动生成200805和200806两个文件夹，想用VB把200805文件夹及里面的文件一起删掉

If Dir$("D:\200805", vbDirectory) <> "" Then Kill (D:\200805)

这样写错在哪啊？
rmdir我用了，因为200805里面是含有文件的，所以不能用rmdir直接删除

首先删除文件夹里面的文件
Dim strFile As String
strFile = Dir("D:\200805\*.*", vbNormal)
Do While strFile <> ""
If strFile <> "." And strFile <> ".." Then Kill "D:\200805\" & strFile
strFile = Dir
Loop

kill只能用于删除文件，要删除文件夹要用rmdir命令。