如何對一個文件夾進行創(chuàng)建和刪除？

% set fs=createobject("scripting.filesystemobject") %>

% MyFolder=server.mappath("/chunfeng/happy/") %>

%

If NOT fs.folderexists(MyFolder) then

     fs.createfolder(MyFolder)

End If

%>

%

If fs.folderexists(MyFolder) then

    response.write "恭喜,文件夾創(chuàng)建成功!"

Else

    response.write "警告:文件夾創(chuàng)建失敗!"

End If

%>

%

set remdir=fs.getfolder(myfolder)

    remdir.delete

set remdir=nothing

If NOT fs.folderexists(myfolder) then

    response.write "恭喜,文件夾刪除成功!"

Else

    response.write "警告:文件夾刪除失敗!"

End If

[1]