TA的每日心情 | 无聊 2018-9-27 10:05 |
---|
签到天数: 36 天 连续签到: 1 天 [LV.5]测试团长
|
本帖最后由 黑羽祭 于 2012-12-21 13:56 编辑
回复 7# 番茄钟
- Set oDesc = Description.Create()
- oDesc("micclass").Value = "Link"
- Set oLink = Browser(":=").Page(":=").ChildObjects(oDesc)
- NumberOfLink = oLink.Count()
- msgbox "有" & NumberOfLink & "个Link对象"
- For i = 0 To NumberOfLink - 1
- If instr(1,oLink(i).GetROProperty("name"),"转发") Then
- oLink(i).highlight
- End If
- Next
复制代码
这段是找到页面上的所有的“转发”并高亮,要随机么就做个0到NumberOfLink - 1的随机数x,用oLink(x)这个对象去点击。
写内容么也可以随机截个A-Z的字符串或者用ASCII码都可以。 |
|