求一个vbs脚本,或者批处理。删除指定文件夹内容。

2024-12-21 09:42:28
推荐回答(2个)
回答1:

@ECHO OFF
IF exist C:\CMIS\调查报告 RD /q /s C:\CMIS\调查报告
IF exist C:\CMIS\检查报告 RD /q /s C:\CMIS\检查报告
IF exist C:\CMIS\temp DEL /q /s C:\CMIS\temp\*.xls
IF exist C:\pmis\temp DEL /q /s C:\pmis\temp\*.xls
PAUSE

if 命令判断文件夹是否存在,存在则删除,不存在跳过.

回答2:

set fso=createobject("scripting.filesystemobject")
msgbox typename(fso)
on error resume next
if fso.FolderExists("C:\CMIS") then
fso.deletefolder "C:\CMIS\调查报告" '把文件夹及内部文件全部删除
fso.createfolder "C:\CMIS\调查报告" '再建立该文件夹
fso.deletefolder "C:\CMIS\检查报告"
fso.createfolder "C:\CMIS\检查报告"
end if
fso.deletefile "C:\pmis\temp\*.xls" '这些文件始终删除
'-----------------------------------------------------
dim fso
set fso=createobject("scripting.filesystemobject")
msgbox typename(fso)
on error resume next
if fso.FolderExists("C:\CMIS") then
fso.deletefolder "C:\CMIS\调查报告" '把文件夹及内部文件全部删除
fso.createfolder "C:\CMIS\调查报告" '再建立该文件夹
fso.deletefolder "C:\CMIS\检查报告"
fso.createfolder "C:\CMIS\检查报告"
else
fso.deletefile "C:\pmis\temp\*.xls" '这些文件C:\CMIS不存在时删除
end if
'你的提问有点模糊,所以弄了两版本