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

結果

執行上述指令碼後，輸出將顯示在訊息框中，如下所示 -