Ⅰ vba 删除文件夹下所有
SubTest()DimfsAsObjectSetfs=CreateObject("scripting.filesystemobject")fs.deletefile"D:Test emp*.*"fs.deleteFolder"D:Test emp*.*"EndSub