QTP自动化测试之VBScript对象

发表于:2012-01-18来源:博客园作者:  known点击数: 标签:QTP自动化测试
VBScript作为脚本语言不仅能够编写简单的脚本,而且还能够创建及使用对象编写复杂的脚本,如Class对象,数据字典,操作文件夹及文件,错误处理,正则表达式等等。 1. Class对象 2. Dictionary对象

  VBScript作为脚本语言不仅能够编写简单的脚本,而且还能够创建及使用对象编写复杂的脚本,如Class对象,数据字典,操作文件夹及文件,错误处理,正则表达式等等。

  1. Class对象

  2. Dictionary对象

  3. FileSystemObject对象

  4. Err对象

  5. RegExp对象

  1. Class对象

  使用Class语句可以创建一个对象,可以为它编写字段、属性及方法,它只有两个对象事件——Initialize与Terminate。首先来看一个简单的Class示例:

  ?

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Class User
    '私有字段,也可以使用Public语句定义公有字段
    Private m_UserName
    Private m_Profile
 
    'Initialize事件相当于构造函数
    Private Sub Class_Initialize
        m_UserName = Empty   '设置UserName初始值为空字符串
    End Sub
 
    'Terminate事件相当于析构函数
    Private Sub Class_Terminate
        Set m_Profile = Nothing   '将对象设置为Nothing,销毁对象
    End Sub
 
    'Property Get语句,获取属性值或对象引用,Default只与Public一起使用,表示该属性为类的默认属性
    Public Default Property Get UserName
        UserName = m_UserName
    End Property
    'Property Let语句,设置属性值
    Public Property Let UserName(newUserName)
        m_UserName = newUserName
    End Property
 
    Public Property Get Profile
        Set Profile = m_Profile
    End Property
    'Property Set语句,设置属性对象引用
    Public Property Set Profile(newProfile)
        Set m_Profile = newProfile
    End Property
 
    'ToString方法
    Public Function ToString()
        ToString = "Hello! " & Me.UserName   'Me相当于C#中的this关键字
    End Function
End Class

原文转自:http://www.ltesting.net