51Testing软件测试论坛

标题: AutomationObjectModel学习中遇到问题 [打印本页]

作者: antony_pan 时间: 2007-9-10 16:21
标题: AutomationObjectModel学习中遇到问题
学习AutomationObjectModel中的Test对象中的save方法的时候，New一个QTP脚本，保存到本地后，在代码编辑区域输入下列内容：

Dim qtApp 'As QuickTest.Application ' Declare the Application object variable

Set qtApp = CreateObject("QuickTest.Application") ' Create the Application object
qtApp.Launch ' Start QuickTest (if not launched)
qtApp.Visible = True ' Make it visible

' Save the current test and open a new one if needed
If qtApp.Test.Modified Then ' If the test was modified
If qtApp.Test.IsNew Then ' If it is a new test (untitled)
qtApp.Test.SaveAs "C:\Temp\TempTest" ' Save it with a temporary name (override existing temporary test)
Else ' If the test exists (has a name)
qtApp.Test.Save ' Save the changes
End If
End If

If Not qtApp.Test.IsNew Then ' If the current test is not new
qtApp.New ' Open a new test
End If

Set qtApp = Nothing ' Release the Application object

（以上内容为save方法保存的例子）
运行后，查看结果，出现错误。错误信息为：
[attach]32650[/attach]

作者: walker1020 时间: 2007-9-10 18:54
你的电脑上有 C:\Temp\TempTest 这个目录吗？

作者: antony_pan 时间: 2007-9-14 10:35
有这个保存目录就是出现错误

作者: sterson 时间: 2007-9-14 11:35
qtApp.Test.SaveAs "C:\Temp\TempTest" 保存到指定的目录了.
qtApp.Test.Save 没有指定保存的目录,保存到哪里?

作者: antony_pan 时间: 2007-9-14 13:43
如果之前已经保存了测试脚本，做更改操作后，qtApp.Test.Save还是保存在原来的目录文件夹下。

作者: selon 时间: 2007-9-26 11:15
顶.......................

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)