Search结果页面测试

lingxi7

大家好，我的问题是：根据选择列表设置了条件，点击“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 ’点击跳出的菜单


我试了好几种办法都行不通，高手帮指点下吧。。。。