asp利用fso實現文件的移動
functionmovefiles(sFolder,dFolder)
onerrorresumenext
dimfso
setfso=server.createobject("scripting.filesystemobject")
iffso.folderexists(server.mappath(sFolder))andfso.folderexists(server.mappath(dFolder))then
fso.copyfolderserver.mappath(sFolder),server.mappath(dFolder)
movefiles=true
else
movefiles=false
setfso=nothing
callalertbox("系統沒有找到指定的路徑["&sFolder&"]!",2)
endif
setfso=nothing
endfunction
asp修改文件夾名稱
functionrenamefolder(sFolder,dFolder)
onerrorresumenext
dimfso
setfso=server.createobject("scripting.filesystemobject")
iffso.folderexists(server.mappath(sFolder))then
fso.movefolderserver.mappath(sFolder),server.mappath(dFolder)
renamefolder=true
else
renamefolder=false
setfso=nothing
callalertbox("系統沒有找到指定的路徑["&sFolder&"]!",2)
endif
setfso=nothing
endfunction
asp檢查文件夾是否存在
functioncheckfolder(sPATH)
onerrorresumenext
dimfso
setfso=server.createobject("scripting.filesystemobject")
iffso.folderexists(server.mappath(sPATH))then
checkfolder=true
else
checkfolder=false
endif
setfso=nothing
endfunction
asp檢查文件是否存在
functioncheckfile(sPATH)
onerrorresumenext
dimfso
setfso=server.createobject("scripting.filesystemobject")