使用ASP创建文件夹的一个函数

<%
Sub so_99su_com(MyFolder)
set fs=createobject("scripting.filesystemobject")
MyFolder=server.mappath(MyFolder)
If NOT fs.folderexists(MyFolder) then
  fs.createfolder(MyFolder)
End If
End Sub
%>