コードコピーは次のとおりです。
'=======================================================
「マルチレベルのディレクトリを作成すると、存在しないルートディレクトリを作成できます
'パラメーター：作成されるディレクトリ名はマルチレベルになります
'ディレクトリのルートディレクトリを作成して、現在のディレクトリから開始します
''たとえば、電話してください
'' CallCreateMultifolder（ "/upload/jumbot/myphoto/"）
'=======================================================
functionCreateMultifolder（byvalcfolder）
dimobjfso、phcreatefolder、CreateFolderArray、CreateFolder
Dimi、II、CreateFolderSub、PhcreatefolderSub、Blinfo
blinfo = false
createfolder = cfolder
onerrorresumenext
setobjfso = server.createObject（ "Scripting.filesystemObject"）
iferrthen
err.clear（）
exitFunction
endif
ifright（createfolder、1）= "/" then
createfolder = left（createfolder、len（createfolder）-1）
endif
createfolderArray = split（createfolder、 "/"）
fori = 0toubound（createfolderArray）