方法找不到，很奇怪！

getfly

最近遇到了一个问题， 很糊涂，不知道是什么原因引起的，各位帮忙看一下：
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

高手能不能把原因也说一下， 顺便告书我一下，这个是关于哪方面的知识， 要查询的话，关键字是什么？

lantianwei

这个应该是你对像本身的问题，可能是没有把你传进来的值当对象处理导致的

dreamever

也有可能是set的对象类型不对。建议用msgbox输出一下那个obj的相关信息检查一下。

getfly

原帖由 dreamever 于 2008-5-7 13:14 发表
也有可能是set的对象类型不对。建议用msgbox输出一下那个obj的相关信息检查一下。

不知道你所说的对象的类型不对是什么意思呢？利用set定义的是一个对象， 但是怎么才能去确定是什么对象类型呢？我知道一个typename函数。
还有怎么样转换对象类型呢？

没有蛀牙

应该不会有错的阿，怪事
是不是这步使得对象变化了阿，BF_INT_Select
你再仔细调试调试

getfly

对象是不是变化怎么看呢？我利用描述性编程也试过了。 还是不行。

没有蛀牙

MsgBox obj.Tostring
obj.Open parentValue
看看msgbox出来的是不是你要的对象