怎样判断一个目录是否存在？

sxgaobo · 发表于 2009-4-11 09:35:09

是2003啊！得2007吗？

koutx · 发表于 2009-4-11 09:42:49

我的也是2003完全没问题呀？引用Office 11.0 Object Library了没有

sxgaobo · 发表于 2009-4-11 10:17:02

本帖最后由 sxgaobo 于 2009-4-11 10:19 编辑

If Dir("D:\File\FIILEn" & "\") = "" Then
MkDir "D:\File\FIILEn" & khm
End If

在File文件夹中没有FIILEn的话可以，有了就报错！

你说的引用也有

chaojianan · 发表于 2009-4-11 10:29:32

子文件夹做成
If Dir("D:\File", vbDirectory) = "" Then
MkDir "D:\File"
MkDir "D:\File\FIILEn"
Else
If Dir("D:\File\FIILEn" & "\") = "" Then
MkDir "D:\File\FIILEn"
End If
End If

koutx · 发表于 2009-4-11 12:28:51

If Dir("D:\File\FIILEn" & "\") = "" Then
MkDir "D:\File\FIILEn" & khm
End If

在File文件夹中没有FIILEn的话可以，有了就报错！
37243
你说的引用也有
37244
sxgaobo 发表于 2009-4-11 10:17

那就在If语句上一行加上On Error Resume next就没事了。

huangyz_xy · 发表于 2009-4-17 14:34:11

是有问题，我用的也是2003

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 怎样判断一个目录是否存在？

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)