Bien acabo de probar este codigo en mi maquina y me crea la carpeta dinopepino:
<pre>
dim filesys, newfolder
set filesys=CreateObject("Scripting.FileSystemObj ect")
If Not filesys.FolderExists("c:\dinopepino\") Then
newfolder = filesys.CreateFolder ("c:\Dinopepino\")
Response.Write("A new folder '" & newfolder & "' has been created")
else
Response.Write("Ya existe la carpeta")
End If
</pre>
Nota:La carpeta te la crea en el directorio raiz del SERVIDOR no en el del cliente.
Pruebalo y nos dices?