Qtp 简明教程

QTP - Accessing Databases

QTP 本身不提供连接到数据库的任何内置支持，但使用 VBScript 测试人员将能够使用 ADODB 对象连接到数据库并与之交互。

ADODB 有 4 个属性或方法，我们可以用它们来处理数据库。它们是：

  1. ADODB.Connection - 用于建立与数据库的连接

  2. ADODB.Command - 用于执行 SQL 命令（查询或存储过程）

  3. ADODB.Fields - 用于在执行查询/存储过程后从记录集中提取特定列

  4. ADODB.Recordset - 用于从数据库中提取数据

How to connect to Database?

数据库可以使用连接字符串进行连接。连接到各个数据库的方式有所不同。但是，可以在 www.connectionstrings.com 的帮助下构建连接字符串

让我们看看如何使用以下参数连接到数据库−

  1. Database Type − MSSQL SERVER

  2. Server Name − SQLEXPRESS

  3. Database Name − Trial

  4. User Id − sa

  5. password − Password123

查询的输出显示在 SQL Server Management Studio 中，如下所示：

qtp accessing db1 
Dim objConnection
'Set Adodb Connection Object
Set objConnection = CreateObject("ADODB.Connection")
Dim objRecordSet

'Create RecordSet Object
Set objRecordSet = CreateObject("ADODB.Recordset")

Dim DBQuery 'Query to be Executed
DBQuery = "Select NAME from dbo.EMPLOYEE where AGE = 29"

'Connecting using SQL OLEDB Driver
objConnection.Open "Provider = sqloledb.1;Server =.\SQLEXPRESS;
User Id = sa;Password=Password123;Database = Trial"

'Execute the Query
objRecordSet.Open DBQuery,objConnection

'Return the Result Set
Value = objRecordSet.fields.item(0)
msgbox Value

' Release the Resources
objRecordSet.Close
objConnection.Close

Set objConnection = Nothing
Set objRecordSet = Nothing

Result

执行上述脚本后，输出显示在消息框中，如下所示：

qtp accessing db2