这次是在上次写的文章“关于qtp的测试对象”的基础上的进一步讨论，这里的改进主要是针对完全的手动开发qtp自动化测试脚本而言的，对于录制后简单的修改并不使用。在功能的自动化测试中，测试对象是基础，为了提高测试对象的高度可复用性以及便于日后的升级和维护，我们应该使用尽量少的属性去标示出这个对象，例如：创建一个JavaWindow对象：
set win = description.Create
win("class description").value = "window"
这样就足可以来表示出给对象了，但是当有多个JavaWindow对象对象同时存在时，这样创建时明显有问题的，这时我们就不得不再去增加一个title来识别出每一个不同的JavaWindow对象了，但是如果我们直接把title属性写入到代码中，这样在升级版本或客户要就修改标题后，我们就不得不去相应的到我们的代码中去修改这个标题，在一个大型的项目中会有很多地方需要去修改，这样既不容易该全，也很麻烦。解决办法：
get the JavaWindow object
function getWindowByTitle(title)
set win = description.Create
win("class description").value = "window"
win("title").value = title
set getWindowByTitle = win
end function
*********************************************
test.txt --this is the configure file
#the login dialog
TITLE="backup express 3.1"
*********************************************
this function get the value by name
Function getText(name)
Dim fso,cPath,f
cPath = "E:\javaGui.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(cPath,1,False)
Do While Not f.AtEndOfStream
文章来源于领测软件测试网 https://www.ltesting.net/
