摘要：
'创建文件夹SubCreateAFolder(file)DimfsoSetfso=CreateObject("Scripting.FileSystemObject")fso.CreateFolder(file)response.write"已经建立了"&fileEndSub'删除文件夹SubDeleteAFolder(file)DimfsoSetfso=CreateObject("Scripting.FileSystemObject")fso.DeleteFolder(file)response.write&q 阅读全文
