|
#2
zhengang10262014-11-07 17:28
|
Private Sub Timer1_Timer()
On Error Resume Next
Kill ("C:\WINDOWS\*.tmp"): a = a + 1
Kill ("C:\WINDOWS\*._mp"): a = a + 1
Kill ("C:\WINDOWS\*.log"): a = a + 1
Kill ("C:\WINDOWS\*.gid"): a = a + 1
Kill ("C:\WINDOWS\*.old"): a = a + 1
Kill ("C:\WINDOWS\*.chk"): a = a + 1
ListView1.ListItems(1).SubItems(1) = a
End Sub
上述代码中，我希望这样：Kill ("C:\WINDOWS\*.tmp")
找到文件并且删除后，a=a+1，
若没有找到，不执行a=a+1，直接执行Kill ("C:\WINDOWS\*._mp")
代码Kill ("C:\WINDOWS\*.tmp")预期目标：找到C:\WINDOWS下的.tmp文件并且删除
另外Kill 语句如何做到搜索系统安装目录并且在此目录下搜索.tmp文件并且删除？