qtp 录制脚本时，要使它运行的时候一些设置的参数自动选择

cindy2013

qtp 录制脚本时，要使它运行的时候一些设置的参数自动选择，如：我在登陆用户设置了参数，在datatable中里设置了几个用户，脚本在运行的时候怎样让它自动在datatable中随机选择用户登陆？

feiyunkai

'下面以数据存放在Action1中的A、B列为例：

'获取Action1行数 (Action1：脚本中存放数据的SheetName)
RowCount=DataTable.GetSheet("Action1").GetRowCount

'取1至RowCount之间的随机数，并赋值给CurrentRow
Randomize
CurrentRow = Int((RowCount * Rnd) + 1)

'将DataTable定位到第CurrentRow行
DataTable.GetSheet("Action1").SetCurrentRow(CurrentRow)

'使用该行数据赋值
Dialog("Login").WinEdit("Agent Name:").Set DataTable("A","Action1")
Dialog("Login").WinEdit("Password:").Set  DataTable("B","Action1")