三兄弟GETRO、GETTO、SETTO各显神通

GetTOProperty()

基本含义：获取对象库中某个对象的某个属性的值。

公式：ReturnValue=对象.GetTOProperty("封装属性名")

基础示例：

  ValueOfTo=Browser("百度一下，你就知道").Page("百度一下，你就知道").Link("新闻").GetTOProperty("text")
  MsgBox ValueOfTo

运行结果与分析：

  获得Link对象在对象库中记录的属性"text"的值，并返回给变量ValueOfTo，最后以对话框形式显示这个值。

 

GetTOProperties()

基本含义：获取对象库中某个对象的所有属性的值。

公式：ReturnValue=对象.GetTOProperties()

基础示例：

Set TestObject=Browser("百度一下，你就知道").Page("百度一下，你就知道").Image("bd_logo1")
Set Properties=TestObject.GetTOProperties()

PropertiesCount=Properties.Count
Print "对象总计存在" & PropertiesCount & "个封装属性."
For i=0 To PropertiesCount-1
 PropName=Properties(i).Name
 PropValue=Properties(i).Value
 Print PropName & "=" & PropValue

Next

Set Properties=Nothing
Set TestObject=Nothing
运行结果与分析：

首先，GetTOProperties这个方法获取的是一个数组，这个务必要清楚，因为是数组，所以想要一个个打印属性值的前提条件就是，先要得到对象的属性个数。然后再通过循环的方法把一个个属性和属性值打印出来。

 

GetROProperty()

基本含义：获取实际在运行时的某个对象的某个属性的值。

公式：ReturnValue=对象.GetROProperty("封装属性名")

基础示例：

  ValueOfRo=Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").GetROProperty("value")
MsgBox ValueOfRo

运行结果与分析：

首先，GetROProperty方法访问的是实际正在运行的对象的封装接口，在这里做一个实验来证明这个方法的效果。第一步就是添加WebEdit这个“wd”控件到对象库中，添加完以后可以看到对象库中该对象的value属性的值是空的；第二步，在编辑框中输入“QTP自动化测试技术领航”，在完成这些操作后，执行下代码片中所写的脚本。