@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 命令判断文件夹是否存在,存在则删除,不存在跳过.
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
'你的提问有点模糊,所以弄了两版本