QTP – 访问数据库

因此，QTP 不提供任何内置支持连接到数据库，但是使用 VBScript 测试人员将能够使用 ADODB 对象连接和与数据库交互。

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

• ADODB.Connection – 用于建立与数据库的连接

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

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

• ADODB.Recordset – 用于从数据库中获取数据

如何连接到数据库？

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

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

• 数据库类型– MSSQL SERVER

• 服务器名称– SQLEXPRESS

• 数据库名称– 试用

• 用户 ID – sa

• 密码– Password123

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

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

结果

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