lingxi7 发表于 2010-7-28 22:18:10

Search结果页面测试

大家好,我的问题是:根据选择列表设置了条件,点击“Search" button 后,所有的值会列在一个Webtable里,现在我想点击第一个单元格中的值,让它获得焦点,因为只有当鼠标放上去时它才会出现个菜单框,需要点菜单框里的菜单。
Browser("XXX").Page("XXX").WebEdit("DataFrom").Click
Browser("XXX").Page("XXX").WebEdit("DataFrom").Set DataTable("DateFrom", dtLocalSheet)
Browser("XXX").Page("XXX").WebEdit("DataTo").Click
Browser("XXX").Page("XXX").WebEdit("DataTo").Set DataTable("DataTo", dtLocalSheet)
Browser("XXX").Page("XXX").WebList("select").Click
Browser("XXX").Page("XXX").WebList("select").Select DataTable("Status", dtLocalSheet)
Browser("XXX").Page("XXX").WebButton("Search").Click
Dim rowlength
Dim FMsg
rowlength=Browser("hp order integration suite").Page("hp order integration suite").WebTable("Status").Object.rows.length
If rowlength >1 Then
FMsg=Browser("XXX").Page("XXX").WebTable("Status").GetCellData(2,2)'获得要点击单元格的内容
Browser("XXX").Page("XXX").WebElement("FirstMsg").SetTOProperty "innertext", FMsg
Browser("XXX").Page("XXX").WebElement("FirstMsg").FireEvent("onmouseover") ‘获得该单元格的焦点
Browser("XXX").Page("XXX").WebElement("Details").Click ’点击跳出的菜单


我试了好几种办法都行不通,高手帮指点下吧。。。。
页: [1]
查看完整版本: Search结果页面测试