Not sure if this is how the code is put, so if there is a better way of turning the commands into script, please tell.
================
Sub Test1()
'Opens the specified URL in a running instance of the specified browser.
Call Browsers.Item(btFirefox).Navigate("http://localhost/peopleess/UserLogin.aspx")
Call Project.Variables.DataLoop.Reset
Dim RecordIdx
RecordIdx = 1
While RecordIdx < 2
Call Project.Variables.DataLoop.Next
RecordIdx = RecordIdx + 1
WEnd
RecordIdx = 2
While RecordIdx <= 3
'Clicks at point (42, 6) of the 'textboxTxtusername' object.
Call Aliases.browser.pagePeopleess2.formForm1.table.cell.tableFormtable.cellCell1.textboxTxtusername.Click(42, 6)
'Sets the text KeywordTests.Test1.Variables.DataLoop("UserID") in the 'textboxTxtusername' text editor.
Call Aliases.browser.pagePeopleess2.formForm1.table.cell.tableFormtable.cellCell1.textboxTxtusername.SetText(Project.Variables.DataLoop.Value("UserID"))
'Clicks at point (45, 16) of the 'passwordboxTxtpassword' object.
Call Aliases.browser.pagePeopleess2.formForm1.table.cell.tableFormtable.cellCell11.passwordboxTxtpassword.Click(45, 16)
'Sets the text KeywordTests.Test1.Variables.DataLoop("Password") in the 'passwordboxTxtpassword' text editor.
Call Aliases.browser.pagePeopleess2.formForm1.table.cell.tableFormtable.cellCell11.passwordboxTxtpassword.SetText(Project.Variables.DataLoop.Value("Password"))
'Clicks the 'submitbuttonBtnlogin' control.
Call Aliases.browser.pagePeopleess2.formForm1.table.cell.tableFormtable.cellCellbutton.submitbuttonBtnlogin.ClickButton
'Waits until the browser loads the page and is ready to accept user input.
Call Aliases.browser.pagePeopleess1.Wait
'Clicks at point (319, 253) of the 'panelSort1' object with the right mouse button.
Call Aliases.browser.pagePeopleess1.formAspnetform.panel.panel.panelSort1.ClickR(319, 253)
'Clicks the 'linkLogout' control.
Call Aliases.browser.pagePeopleess1.formAspnetform.panelNavMenu.linkLogout.Click
'Waits until the browser loads the page and is ready to accept user input.
Call Aliases.browser.pagePeopleess2.Wait
Call Project.Variables.DataLoop.Next
RecordIdx = RecordIdx + 1
WEnd
End Sub