目标：
如果没有该文件夹，新建一个，
如果有，则清空文件夹内的文件
Sub program()
If Dir("F:\12mZGJSapAPI") <> "" Then
If Dir("F:\12mZGJSapAPI\*.*") <> "" Then
Kill "F:\12mZGJSapAPI\*.*"
End If
Else
MkDir "F:\12mZGJSapAPI"
End If
End Sub
代码哪里搞错了？提示路径不对
这是因为使用MkDir的时候，这个文件夹已经存在了！所以会报错。
应该在使用MkDir 之前，检查一下文件夹是否已存在！
应该在使用MkDir 之前，检查一下文件夹是否已存在！
温馨提示：答案为网友推荐，仅供参考
第1个回答 2015-09-10
这是因为使用MkDir的时候，这个文件夹已经存在了！所以会报错。本回答被提问者采纳
