您现在的位置是:网站首页> 编程资料编程资料

如何用表单在线建立目录?_编程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
%>

-六神源码网