Create a folder online with a form

Online

The contents of the Folder.htm form file in HTML format:

<form name= "Form1" method= "Post" action= "folder-action.asp" >
Create a folder
<input type= "text" name= "name" >
<input type= "Submit" name= "submit" value= "Submit" >
</form>

ASP file folder-action.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
%> Folder created successfully! Called
<%=MyFolder%>

<%Else%%>
There has been an error.
<%end If
%>

You can also download the zip file in the Http://designbliss.com.au/asp/download.asp?file=folder.zip