asp实现检查目录是否存在与建立目录的函数
ASP 实现 函数 目录 是否 建立 存在 检查
2023-06-13 09:13:57 时间
"-------------------------
"--检查目录是否存在
"----------------------
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
"--检查目录是否存在
"----------------------
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
相关文章
- 使用ASP实现高效缓存——redis的应用(aspredis)
- ASP程序如何利用MySQL更好地实现服务(asp需要用到mysql)
- ASP连接MySQL实现数据交互的操作语句(asp连接mysql语句)
- ASP操作MySQL数据库实现简单便捷功能(asp用mysql数据库)
- ASP操作Oracle6实现最佳数据库连接体验(asp连接oracle6)
- XML加ASP实现网页“本地化”
- ASP利用Google实现在线翻译功能
- 可用的ASP无重复数字随机函数,数组实现,并应用于随机显示记录集
- ASP.NET实现用图片进度条显示投票结果
- 比较不错的asp模板引终极讲解(WEB开发之ASP模式)
- FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码
- asp下实现IP限制函数代码
- asp.netUpdatePanel实现无刷新上传图片
- ASP使用Filter函数来检索数组的实现代码
- 扩展ASP.NETMVC三层框架且使用StructureMap实现依赖注入1-Model层
- asp.netC#实现下载文件的六种方法实例
- asp.net使用jquery实现搜索框默认提示功能
- ASP.NET实现将word文档转换成pdf的方法