51Testing软件测试论坛

标题: Test Complete自动测试工具参数化吗？ [打印本页]

作者: 懵懂的女孩 时间: 2009-11-24 15:18
标题: Test Complete自动测试工具参数化吗？
Test Complete自动测试工具参数化吗？
最近在使用这个工具测试delphi开发的程序，录制脚本，文本框的内容在回放前必须修改的和录制不一样，才可以用。（注：数据都保存到数据库中，不能输入重复的名称）
这个工具是否可以象QTP那样，可以进行参数化,在此谢谢大家了。

作者: 懵懂的女孩 时间: 2009-11-25 09:53
怎么没人回答呢？

作者: lantianwei 时间: 2009-11-25 10:08
怎么可能不可以参数化呢？

作者: 懵懂的女孩 时间: 2009-11-25 10:16
标题: 回复 3# 的帖子
这个工具不可以做参数化？

作者: lantianwei 时间: 2009-11-25 10:19
标题: 回复 4# 的帖子
肯定可以的这是自动化测试工具的基本要求

作者: 懵懂的女孩 时间: 2009-11-25 12:07
标题: 回复 5# 的帖子
谢谢。怎么使用呢?我想对一个文本框进行参数化。

作者: lantianwei 时间: 2009-11-25 19:53
我没用过该工具但一般参数都差不多的你看看EXAMPLE文件里面肯定有

作者: 懵懂的女孩 时间: 2009-11-27 12:19
问题已经解决了。
TestComplete从Excel中导入数据，进行参数化方法：
定义全局变量：
Var
MSExcel:OleVariant;
ExcelFile;
声明函数：
function ReadExcel(i,j):string;forward;
在项目中定义变量：
i,j:integer; //声明取值的变量
FileName:string;//声明文件路径
begin
初始化变量赋值：
i:=0;
j:=0;
FileName:='磁盘名\文件名.xls'//给文件路径赋值
ExcelFile := Sys.WaitProcess('EXCEL');\\获取excel系统进程
if ExcelFile.Exists then\\判断EXCEL进程是否存在，如果存在结束进程，不存在就创建
   ExcelFile.Terminate();
  try
   MsExcel := Sys.OleObject('Excel.Application');
  except
   Log.Warning('Unable to initialize MS Excel.', '', pmHigher);
   Exit;
  end;
  MsExcel.Workbooks.Open(FileName);\\打开EXCEL文件

找到需要参数化的地方，将Excel的是赋给它
w4.Keys(ReadExcel(i,j));//获取EXCEL值

function ReadExcel(i,j):string;//自定义从EXCEL取值函数
begin
Result := MsExcel.Cells(i,j).Value;
end;
将代码贴出来大家可以看看

作者: carol2000 时间: 2010-4-8 10:17

//EXCELPATH为表格路径，SHEET为需要参数的sheet
//ColumnIndex 是需要参数化的数值所在的列，从第2行开始计数(不包括首行标题)
Sub Main
dim EXCELPATH,SHEET
EXCELPATH = "D:\test.xlsx"
SHEET = "Sheet1"
set Driver = DDT.ExcelDriver(EXCELPATH,SHEET,true)
Call test(Driver)
DDT.CloseDriver(Driver.Name)
End Sub
sub test(Driver)
while not Driver.EOF
log.message(Driver.Value(ColumnIndex))
Call driver.next
Wend
End Sub

复制代码

[ 本帖最后由 carol2000 于 2010-4-8 11:48 编辑 ]

作者: TIB 时间: 2010-4-9 13:30
用TestComplete的DDT对象可以实现数据驱动测试

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)