La forma de crear un directorio con ASP es muy sencilla. Al igual que el resto de operaciones con ficheros utilizaremos el objeto FileSystemObject. Así tendremos una primera línea como esta:
Set fso = CreateObject("Scripting.FileSystemObject")
Los objetos siempre los creamos mediante la clausula CreateObject(nombreDelObjeto). Una vez creado el objeto simplemente deberiamos de usar el método CreateFolder(nombreDelDirectorio), pero si existe el directorio nos va a dar un error. Es por ello que deberemos de validar la existencia del directorio mediante FolderExits(nombreDelDirectorio).
if (Not fso.FolderExists(carpeta)) then
Set fol = fso.CreateFolder(carpeta)
end if