Bueno de primeras dime que hace, te da un error o simplemente no hace nada, otra cosa ¿Tienes permiso de escritura?
Haz una prueba con este codigo
<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")
End If
%>
</pre>
Dime algo?