最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 建立文件夹(递归)
时间:2022-06-29 14:25:08 编辑:袖梨 来源:一聚教程网
function createfolder(folderpath)
on error resume next
err=false
dim sparfolder
sparfolder=getparentfolder(folderpath)
if not ofso.folderexists(sparfolder) then
createfolder(sparfolder)
end if
ofso.createfolder(folderpath)
if err then
createfolder=false
else
createfolder=true
end if
end function
function getparentfolder(path)
dim spath
spath=path
if right(spath,1)="" then spath=left(spath,len(spath)-1)
spath=left(spath,instrrev(spath,"")-1)
getparentfolder=spath
end function
相关文章
- 不思议迷宫神农试炼怎么过 05-17
- 《支付宝》蚂蚁庄园6月18日答案2022 05-17
- 欢乐钓鱼大师体验模式怎么开启 05-17
- 不思议迷宫咒灵试炼怎么过 05-17
- 崩坏星穹铁道如狼成就怎么获取 05-17
- DNF手游安图恩困难模式怎么打 DNF手游安图恩困难模式攻略技巧 05-17