51Testing软件测试论坛

标题: 方法找不到,很奇怪! [打印本页]

作者: getfly    时间: 2008-5-6 14:37
标题: 方法找不到,很奇怪!
最近遇到了一个问题, 很糊涂,不知道是什么原因引起的,各位帮忙看一下:
set lTaskTree = Browser("Browser").FlexApplication("****").FlexTitleWindow("roject Detail").FlexAccordion("projectAccordion").FlexCanvas("roject Task").FlexTree("leftTaskTree")

我操作这个对象:
lTaskTree.Open "Task_Category_002qw"
执行,没有问题。

让然后我把oen这个方法放到一个函数中,
Function UD_Flex_SelectInTree ( obj, parentValue, childValue, ojbName )
  if IsNull( childValue ) then
  BF_INT_Select obj, parentValue, ojbName
  On Error Resume Next
obj.Open parentValue
  On Error GoTo 0
  Err.Clear

  else
  BF_INT_Select obj, parentValue, ojbName

  On Error Resume Next
  obj.Open parentValue
  On Error GoTo 0
  Err.Clear
  BF_INT_Select obj, parentValue&">"&childValue, ojbName
  end if
End Function

我调用这个函数:
UD_Flex_SelectInTree lTaskTree, "Task_Category_002qw", NULL, "Task"
结果:出现这样的错误:
Unable to find automation method 'open' for class 'name: FlexTree superClassName: FlexList event2descriptor: (Object)#0 flash.events.FocusEvent|keyFocusChange = (mx.automation.qtp:TPEventDescriptor)#1 eventClassName
即使我这样:
UD_Flex_SelectInTree Browser("Browser").FlexApplication("****").FlexTitleWindow("roject Detail").FlexAccordion("projectAccordion").FlexCanvas("roject Task").FlexTree("leftTaskTree"), "Task_Category_002qw", NULL, "Task"
也不行。 请教各位高手, 这是为什么呢。怎么解决呢!
谢谢!

[ 本帖最后由 getfly 于 2008-5-6 14:51 编辑 ]
作者: getfly    时间: 2008-5-6 14:39
高手能不能把原因也说一下, 顺便告书我一下,这个是关于哪方面的知识, 要查询的话,关键字是什么?
作者: lantianwei    时间: 2008-5-7 10:30
这个应该是你对像本身的问题,可能是没有把你传进来的值当对象处理导致的
作者: dreamever    时间: 2008-5-7 13:14
也有可能是set的对象类型不对。建议用msgbox输出一下那个obj的相关信息检查一下。
作者: getfly    时间: 2008-5-7 14:34
原帖由 dreamever 于 2008-5-7 13:14 发表
也有可能是set的对象类型不对。建议用msgbox输出一下那个obj的相关信息检查一下。


不知道你所说的对象的类型不对是什么意思呢?利用set定义的是一个对象, 但是怎么才能去确定是什么对象类型呢?我知道一个typename函数。
还有怎么样转换对象类型呢?
作者: 没有蛀牙    时间: 2008-5-7 16:11
应该不会有错的阿,怪事
是不是这步使得对象变化了阿,BF_INT_Select
你再仔细调试调试
作者: getfly    时间: 2008-5-8 10:55
对象是不是变化怎么看呢?我利用描述性编程也试过了。 还是不行。
作者: 没有蛀牙    时间: 2008-5-8 16:03
MsgBox obj.Tostring
obj.Open parentValue
看看msgbox出来的是不是你要的对象




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2