| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付买域名,送MP3、MP4
高端软件开发 = 年薪十万不是梦赛孚耐:软件保护加密专家身份认证令牌USB KEY买空间,免费送域名(厦门中资源)
共有 466 人关注过本帖
标题:如何检测创建的文件夹已存在了?
收藏  订阅  推荐  打印 
chenchuanlin
Rank: 1
等级:新手上路
帖子:14
积分:178
注册:2008-6-27
如何检测创建的文件夹已存在了?

我现在在网站后台自动创建文件夹,但现在出现一个问题是:怎么样才能检测我创建的这个文件夹是否已经存在,如果存在,将给予提示,如果不存在,就将创建这个文件夹。
这是我写的一段代码,可是没效果,请高手帮帮忙:万分感谢!!!
<%
Set fso = CreateObject("Scripting.FileSystemObject")
if fso.FolderExists(server.mappath("../"+ request("SySmalltypename")))=False then
Fso.Createfolder(server.mappath("../"+ request("SySmalltypename")))
else
response.write("此文件夹已经存在,请重新命名!")
end if
Set fso = nothing
%>
搜索更多相关主题的帖子: 文件夹  检测  后台  效果  提示  
2008-7-8 10:12
multiple1902
Rank: 12Rank: 12Rank: 12
等级:版主
威望:40
帖子:4479
积分:45682
注册:2007-2-9

Sub MkDir(path)
    path=Server.MapPath(path)
    Dim fso
    Set fso=Server.CreateObject("Scripting.FileSystemObject")
    If Not fso.FolderExists(path) Then fso.CreateFolder(path)
    Set fso=Nothing
End Sub

我是这么写的

“高考”这个词在耳边不断萦绕,心中的激动不言而喻。写下一句话,一起努力。Let's struggle together.
2008-7-8 19:31
chenchuanlin
Rank: 1
等级:新手上路
帖子:14
积分:178
注册:2008-6-27
这个路径是怎么回事?

我现在的路径是不确定的,我主要是与根目录下所创建的文件夹进行比较,如果有就有相关提示,没有就自动创建一个。我是在后台输入一个“文件夹名称”,然后点创建。就会在根目录下创建一个文件夹,现在该怎么样把根目录下的文件夹全部调出,与我所创建的文件夹名称进行比较,这样才能检测出啊,我想的原理就是这样。兄弟,path怎么确定呢?
2008-7-9 08:06
makebest
Rank: 3Rank: 3
等级:中级会员
帖子:389
积分:4160
注册:2005-3-17

fso.FolderExists 是能检测出来的, 可能还要找找真正的原因是什么
2008-7-10 15:41
hmhz
Rank: 12Rank: 12Rank: 12
等级:版主
威望:15
帖子:1539
积分:16712
注册:2006-12-17

Folder=Server.Mappath("路径")
Set FSO= Server.CreateObject("Scripting.FileSystemObject")
IF FSO.FolderExists(Folder) Then
   response.write("此文件夹已存在,请重新命名!")
Else
   response.write("此文件夹不存在,开始建立!")
End IF

ASP编程超级群号:49158383  敲门暗号:ASP编程
2008-7-12 10:09
chenchuanlin
Rank: 1
等级:新手上路
帖子:14
积分:178
注册:2008-6-27
Folder=Server.Mappath("路径")??

Folder=Server.Mappath("路径"),这个路径也是不确定的,我是比较一个文件夹所有的文件夹名称,所以应该要用Server.Mappath方法吧??谢谢
2008-7-14 13:26
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.070209 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved