51Testing软件测试论坛

标题: 帮我看看我的问题出在什么地方 [打印本页]

作者: yingy 时间: 2008-3-18 14:41
标题: 帮我看看我的问题出在什么地方
'$Include "sqautil.sbh"
Sub Main
Dim Result As Integer
dim dp as long
dim x as integer
dim num1 as string
dim num2 as string
dim sum as string

'Script Name: 计算器

StartApplication "C:\WINNT\system32\calc.exe"

dp=SQADatapoolOpen("jsq")

for x=1 to 5
Call SQADatapoolFetch(dp)
Call SQADatapoolValue(dp,1,num1)
Call SQADatapoolValue(dp,2,num2)
Call SQADatapoolValue(dp,3,sum)
Window SetContext, "Caption=计算器", ""
InputKeys num1 &"{+}"& num2 &"{ENTER}"

Result = LabelVP (CompareNumeric, "Text="& sum &".", "VP=Alphanumeric;Value="& sum &".")

next

Call SQADatapoolClose(dp)

Window CloseWin, "", ""

End Sub
这是一个简单的"WINDOWS CALC"程序，回放的时候发现不能正确运行，请帮我看看问题出在什么地方
注释：在datapool中已经编辑了数据，但是运行失败

[ 本帖最后由 yingy 于 2008-3-18 14:43 编辑 ]

作者: irene0331223 时间: 2008-3-18 16:17
应该是验证点的文题吧，要不先调试看看数据池的值能否正确读出。

作者: net_ufo 时间: 2008-3-18 16:52
看一下验证点比较器，"VP=Alphanumeric;Value="& sum &"." ，这个最后面不加 "." 试试

作者: ilovejolly 时间: 2008-3-28 10:24
乱试什么，调一下就知道问题出在哪了

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