'--------------------------
'-检查目录是否存在
'-----------------------
functioncheckdir (byvalfolderpath)
Dimfso
setfso = server.createobject ( "scripting.filesystemobject")
iffso.dolerexists (Server.mappath (폴더 스팟))
'存在
checkdir = true
또 다른
'不存在
checkdir = false
endif
setfso = 아무것도
최종 기능 장애
'--------------------------
'-建立目录
'-----------------------
functionmakenewsdir (byvalfoldername)
Dimfso
setfso = server.createobject ( "scripting.filesystemobject")
fso.createfolder (server.mappath (folderName))
iffso.dolerexists (Server.mappath (folderName))
makenewsdir = true
또 다른
makenewsdir = false
endif
setfso = 아무것도
최종 기능 장애