怎么删除指定文件夹下的文件!?

horson 2006-09-29 11:16:16
我想知道怎么删除指定文件夹app.path & "/DatFile"下面的所有文件以及指定文件名的文件希望能用模块来实现。模块:
Public Sub DelFile(FilName as String)
If 文件夹非空 Then
If FilName = "all" Then
'删除所有文件
Else
'删除文件FilName
End If
End If
End Sub
...全文
72 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
wully 2006-09-29
  • 打赏
  • 举报
回复
kill就行了
of123 2006-09-29
  • 打赏
  • 举报
回复
用不着自定义函数,用 Kill,支持通配符:

kill "c:\temp\*.*"
kill "c:\my documents\*.txt"
kill app.path & "\test.txt"
VBToy 2006-09-29
  • 打赏
  • 举报
回复
Kill path & "\" & filename '删除单个文件
Kill path & "\" & "*.*" '删除所有文件

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧