VBA中要判断C盘WINDOWS文件夹中是否存在123.rar文件!如果有,程序运行,没有则退出!

请给出代码 谢谢
请问一楼
为何指定路径存在文件了
程序还是执行ELSE后面的语句

Public Sub test()

i = Dir("C:\WINDOWS\123.rar", vbNormal)
If (i = "") Then
Exit Sub
Else
'执行你的代码
End If
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2009-05-03
Dim objFSO
Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists("C:\WINDOWS\123.RAR") Then
'执行你的代码
Else
Exit Sub
End If
第2个回答  2009-05-04
2楼是正解,1楼可能有点问题

相关了解……

你可能感兴趣的内容

大家正在搜

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网