asp createfolder problema

[cipcip]

volevo chiedervi come mai utilizzando il comando createfolder per generare cartelle remote viene generato questo errore:

Microsoft VBScript runtime error '800a004c'

Path not found

L'errore viene generato da questo codice

<%
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.CreateFolder(server.mapPath("public/1/2/3/4"))
set f=nothing
set fs=nothing
%>

Limitatamente alla creazione della cartellina chiamata "4" di
Poiche' la creazione delle cartelline precedenti da esito positivo.

Che sia una limitazione sulla profindita' imposta dal provider?

Vi ringrazio

[orcim]

Dim fso

 Set fso = Server.CreateObject("Scripting.FileSystemObject")
  Dim FolderVirtualPath
   FolderVirtualPath = NomeCartella
  Dim FolderPhysicalPath
 FolderPhysicalPath = Server.mapPath(FolderVirtualPath)

if fso.FolderExists(FolderPhysicalPath) then

response.write "cartella esistente"

else

   fso.CreateFolder(FolderPhysicalPath)

   fso.CreateFolder FolderPhysicalPath &"/PippoUno"
   fso.CreateFolder FolderPhysicalPath &"/PippoDue"
   fso.CreateFolder FolderPhysicalPath &"/PippoTre"
   fso.CreateFolder FolderPhysicalPath &"/PippoQuattro"
   fso.CreateFolder FolderPhysicalPath &"/PippoCinque"
   fso.CreateFolder FolderPhysicalPath &"/PippoSei"

Set fso = Nothing 
end if