zzq198189 发表于 2008-8-18 11:14:25

QTP与EXL值比较

小弟不是做测试的。弱弱的请教下。。。。。。
在QTP中如何判断EXL表中的值是否是正确的。
是不是要读入EXL表,然后用checkpoint做?
请赐教(详细),谢谢

yuhuawang 发表于 2008-8-18 11:47:52

读入后,用Datatable(“列名”,sheetid)=...比较
sheetid可以是dtglobalSheet\dtLocalSheet\sheetname

dalinangel 发表于 2008-8-18 14:38:33

用以下代码就OK啦!

Set excobj = createobject("Excel.Application")
Set excfile = excobj.workbooks.open("c:\pp.xls")
Set excsheet = excfile.worksheets("Sheet1")

celldata = excsheet.cells(1,1)


gg = StrComp("正确的值",Trim(celldata))

Ifgg = 0 Then
MsgBox ("相同")
Else
MsgBox ("不相同")
End If
页: [1]
查看完整版本: QTP与EXL值比较