<%
Dim FSO, ind, var
ind = nome cartella principale
var = nome cartella da creare
SET FSO = Server.CreateObject(" Scripting.FileSystemObject" )
' L' indirizzo lo " creiamo" dinamicamente con l' utilizzo di 2 variabili,
' - ind : contiene la cartella in cui ci si trova
' - var : il nome della nuova cartella
FSO.CreateFolder(Server.MapPath(ind & " \" & var)
SET FSO = NOTHING
%>