Question

VB安装后提示“找不到路径”？我明明设置了app.path了啊！高手帮帮我！

我用VB写了程序，在程序里我写了这样的一段代码：Fso.CreateFolder App.Path & "\" & "DocStore" & "\" & str，这里的str是字符串变量，是我要新建的文件名。
我编写代码时候好好的，可是等我打包后，安装的时候就出现找不到路径了。

Answer 1

App.Path如果放到磁盘根目录中，
例如放在C盘，返回值为"c:\".
后面就自动有了"\"，所以要用
if right(app.path,1)="\" then
判断一下。

Answer 2

我用VB写了程序，在程序里我写了这样的一段代码：Fso.CreateFolder App.Path & "\" & "DocStore" & "\" & str，这里的str是字符串变量，是我要新建的文件名。
我编写代码时候好好的，可是等我打包后，安装的时候就出现找到路径了。

Answer 3

在App.path下新建DocStore目录没有？

追问

建了，我的目的是在我程序里把所有新建的文件夹都放到DocStore里。我也建立了DocStore文件夹。编写代码的时候一切正常。可是用Setup Factory 7.0打包后，再安装的时候，新建文件夹就提示“运行时错误 76，未找到路径”。我该用MkDir来新建也是相同的效果。

追答

你编的是安装代码吗？
可以试一下先测试一下app.path是否和你设计的一样。

追问

安装代码？我不知道啊！我使用了个text显示安装后运行的app.path值，显示的也是我安装的那个目录啊！可是一创建文件时候怎么就找不到路径呢？app.path和我设计的一样。可是怎么加上就找不到路径了呢？

追答

1、确定app.path目录下的是DocStore目录而不是DocStore文件。
2、app.path & "\" & "DocStore"中有"\"，其他代码中是否丢失了？
3、目录名DocStore是否一致? 可以考虑将app.path & "\" & "DocStore"存储到一个变量中。
4、可能的话把相关代码都贴出来帮你分析分析。

Answer 4

看一下根文件目录名中有没有空格