creatfolder.htmxml:namespace prefix = o ns = “urn:schemas-microsoft-com:office:office” /??
‘ 表åÂÂæÂÂ件.
<form name=”form1″ method=”post” action=”folder.asp”>
Ã¥ÂÂ建ä¸Â个æÂÂ件夹:
<input type=”text” name=”name”>
<input type=”submit” name=”Submit” value=”æÂÂ交“>
</form>
ÃÂ
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
%>