如何能把wintreeview的对象全部展开呢?
想用递归可是传不了参数啊[ 本帖最后由 xzcg 于 2009-4-28 14:06 编辑 ] 自己顶 一下
现在用的是wshell 的模拟按键
还有别的方法吗? 用childobjects 方法找到所有的+对象,依次点击就可以了 只能展开一层吧
我想把所有的都展开
想用递归可是又不能传递参数
改怎么办呢? 看看这个巴
http://bbs.51testing.com/thread-146731-1-3.html 我写了个函数,你44 Function expand_tree()
Set oDesc=Description.Create()
oDesc("micclass").value="Image"
oDesc("file name").value="plus2.gif"
Set objs=Browser("i@Report通用WEB网络报表平台").Page("i@Report-main").Frame("mainFrame_2").ChildObjects(oDesc)
Numberofobjs=objs.Count()
For i=0 to Numberofobjs-1
objs(i).Click
call expand_tree()
Next
End Function oDesc("micclass").value="Image"
oDesc("file name").value="plus2.gif"
这两个是设置+号的属性吧
可是对于windows上面的+不能这样识别
我也没有找到可以识别的办法 Function TestFunction(temp)
If temp.GetItemsCount>0 Then
For j=1 to temp.GetItemsCount
tempstr=temp.GetROProperty("selection")
temp.select tempstr
temp.expandall tempstr
Next
End If
End Function
其中temp是一个wintreeview 的对象
可是不知道怎么找到下一个+号
childobjects
getitem(j)
都搞不定啊
帮帮忙啊
页:
[1]