您现在的位置是:网站首页> 编程资料编程资料
如何用表单在线建立目录?_编程10000问_
2023-05-25
204人已围观
简介 如何用表单在线建立目录?_编程10000问_
creatfolder.htm
' 表单文件.
创建一个文件夹:
提交">
folder.asp
<%@ LANGUAGE = "VBScript" %>
<% Dim Name
Name = Request("Name")
set fs=createobject("scripting.filesystemobject")
MyFolder=server.mappath(""&name&"")
If NOT fs.folderexists(MyFolder) then
fs.createfolder(MyFolder)
End If
If fs.folderexists(MyFolder) then
%>
恭喜,文件夹:<%=MyFolder%>创建成功!
<%Else%%>
噢,出错啦!
<%End If
%>
