QTP 打开录制的代码后，如何将默认路径指向工程路径而非QTP安装路径

zhy

最近遇到一个奇怪问题，QTP每次打开待运行程序时，直接执行程序，发现程序中指定的从硬盘读取文件相对路径无法找到文件，查看发现每次打开QTP默认路径均为QTP的安装路径，怎样可以将QTP默认打开的安装路径指向所执行程序的路径。

TIB

用SystemUtil.Run启动被测试程序，指定被测试程序的工作目录
SystemUtil.Run   file, [params], [dir], [op], [mode]
dir ：The default directory of the application or file.  

例如：
SystemUtil.Run "calc","","C:\"

jorhna

可以考虑使用环境变量Environment("TestDir")

feiyunkai

方法一：Tools→Options→Folders→点击"+",将项目所在根目录添加进来（例如：D:\project）
设置好以后，访问项目文件夹下的文件就可以使用相对路径了（例如：访问D:\project\TsetCase\TestCase.xls，使用TsetCase\TestCase.xls就可以访问了）
方法二：
Public Function Folder_add(Projectpath)
'函数名称：Folder_add
'函数作用：添加QTP默认文件夹
'参数：项目文件所在路径
'示例：假设项目文件所在路径为：D:\project，则Call Folder_add("D:\project")
Set qtapp=CreateObject("QuickTest.Application")
qtapp.Folders.Add(Projectpath)
Set qtapp=Nothing
End Function

[ 本帖最后由 feiyunkai 于 2010-4-16 09:55 编辑 ]