Descriptive programming for Data Driven in QTP

[QTPLearn]

You can use VBScript to automate this scenario.
1st Approach:

Add both the text boxes as an objects in Object Repository.After that use 'Global' sheet to create a table.

Code

Code:

Browser("Mercury").Page("Mercury").WebEdit("UserName").Set("UserName",dtGlobalSheet)
Browser("Mercury").Page("Mercury").WebEdit("Password").Set("Password",dtGlobalSheet)

2nd Approach:

Use 'Description.Create' for creating the object.

Code:

Set objText= Description.Create()
objText("Class Name").value = "WebEdit"
objText("name").value = "UserName"
Browser("Mercury").Page("Mercury").WebEdit(objText).Set("UserName",dtGlobalSheet)

Hope this will help you!