繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp实现检查目录是否存在与建立目录的函数
- ASP
- ASP编程中15个非常有用的例子 （二）
- ASP与JSP的比较(一)
- ASP与JSP的比较(二)
- ASP中五种连接数据库的方法
- 从ASP调用SQL中的图像
- 用排序串字段实现树状结构（例程：连接字串）
- 用排序串字段实现树状结构（例程：删除贴子）
- 用排序串字段实现树状结构（例程：回复表单）
- 用排序串字段实现树状结构（例程：显示贴子内容）
- 用排序串字段实现树状结构（例程：显示树）
- 用排序串字段实现树状结构（存储过程）
- 用排序串字段实现树状结构（库结构）
- 用排序串字段实现树状结构（原理）
- remote script文档(转载自微软)(一)
- remote script文档(转载自微软)(二)
- remote script文档(转载自微软)(三)
- remote script文档(转载自微软)(四)
- remote script文档(转载自微软)(五)
- remote script文档(转载自微软)(六)
- remote script文档(转载自微软)(七)
ASP 中的 asp实现检查目录是否存在与建立目录的函数
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 186 ::
收藏到网摘: n/a
'-------------------------
'--检查目录是否存在
'----------------------
Function CheckDir(byval FolderPath)
dim fso
Set fso = Server.CreateObject("Scripting.FileSystemObject")
If fso.FolderExists(Server.MapPath(folderpath)) then
'存在
CheckDir = True
Else
'不存在
CheckDir = False
End if
Set fso = nothing
End Function
'-------------------------
'--建立目录
'----------------------
Function MakeNewsDir(byval foldername)
dim fso
Set fso = Server.CreateObject("Scripting.FileSystemObject")
fso.CreateFolder(Server.MapPath(foldername))
If fso.FolderExists(Server.MapPath(foldername)) Then
MakeNewsDir = True
Else
MakeNewsDir = False
End If
Set fso = nothing
End Function
评论 (0) All
