51Testing软件测试论坛

标题: 高手指教QTP中如何把对象赋给变量？ [打印本页]

作者: jiamin_ff 时间: 2009-1-5 11:29
标题: 高手指教QTP中如何把对象赋给变量？
我在写测试脚本碰到以下问题，
就是我写好了个包括参数的函数如 Function CheckTableGrid(aFindStr, aSwfTableObj, aColName）其中参数aSwfTableObj就是一对象这样是为了方便我后的的取对象总行如aSwfTableObj.RowCount，aSwfTableObj.GetCellData(i, aColName)调用
问题是我定了一个变量dim a
对象赋给变量
a=SwfWindow("MainForm").SwfWindow("车种管理").SwfTable("SartoriusGridView") 这样的方试QTP就运行提示出错不支持了
SwfWindow("MainForm").SwfWindow("车种管理").SwfTable("SartoriusGridView")是我程序录制下来的一个对象也就是数据显示的表格SwfTable
然后调用 CheckTableGrid（789，a, "编号"）也没法执行了

作者: david208 时间: 2009-1-5 11:34
前面加个set ,凡是对象的赋值都要加set，其他的无所谓，DIM都可以没有。
set a=SwfWindow("MainForm").SwfWindow("车种管理").SwfTable("SartoriusGridView")

作者: zhangxinnow 时间: 2009-1-5 11:35
对，加set

作者: jiamin_ff 时间: 2009-1-5 12:07
呵呵原来QTP要用SET方法的，明了。还搞了半天下面还有一小问题
Dim wdApp As Object
Set wdApp = CreateObject(SwfWindow("MainForm").SwfWindow("车种管理").SwfTable("SartoriusGridView"))
我找VBscrip找出来的，本想试下这样给变量对象值的。问题是第一句就提示错了。

作者: gchaser 时间: 2009-1-5 12:33
Dim wdApp As Object
修改成 Dim wdApp
或者去掉 Dim wdApp As Object
在QTP中用dim是不能象vb那样指明变量的类型的。所以qtp中的dim没有多大作用，也就是起到增加可读性而已。

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