QTP - 访问数据库

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

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

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

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

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

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

如何连接到数据库？

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

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

• 数据库类型 - MSSQL SERVER

• 服务器名称 - SQLEXPRESS

• 数据库名称 - Trial

• 用户 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

结果

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