如何用asp实现在指定目录创建指定文件夹？？

<%

dir=server.mappath("/temp")
'要创建的文件夹希望的相对或绝对路径，转化为物理路径

Set fso = CreateObject("Scripting.FileSystemObject")

if not (fso.FolderExists(dir)) then

fso.CreateFolder(dir)

response.write("temp文件夹已经建立")

end if

%>