51Testing软件测试论坛

标题: 搜索栏搜索出来的东西，怎么验证？ [打印本页]

作者: iseedeadpeople 时间: 2010-11-30 19:36
标题: 搜索栏搜索出来的东西，怎么验证？
RT
匹配是模糊的，这个怎么qtp验证？类似baidu
的搜索栏~ CS,bs 都有

作者: TIB 时间: 2010-11-30 21:35
这个跟测试数据有关系

作者: sunnyswu 时间: 2010-11-30 22:41
bs的使用dom对象来做，我试过了，贴几行代码出来
而 cs的就不太清楚了
希望对你有启发
Systemutil.Run "C:\Program Files\Internet Explorer\iexplore.exe", "", "", "open"
Browser("企业招聘").Page("企业招聘").Sync

Browser("企业招聘").Navigate "http://www.eptrc.com/job_list.aspx"
Browser("企业招聘").Page("企业招聘").Sync
Set dom = Browser("企业招聘").Page("企业招聘").Object.documentElement
flag = 0
Set odivs = dom.getElementsByTagName("div")
For i = 0 to odivs.length - 1
If (trim(odivs(i).innertext)) = "企业招聘信息" Then
' msgbox odivs(i).innertext & ", " & i
flag = flag + 1
Set mydiv = odivs(i)
Exit for
End If
Next
'msgbox flag

dim content
If flag = 1 Then
flag = 0
Set strCompanyNameTitleDiv = mydiv.parentnode
If trim(strCompanyNameTitleDiv.classname) = "texttitle" Then
Set mysearchtable = strCompanyNameTitleDiv.nextsibling
Set mychilddivs = mysearchtable.childnodes
For i = 0 to mychilddivs.length - 1
If trim(myChildDIVs.item(i).classname) = "row" or trim(myChildDIVs.item(i).classname) = "rowhl" Then
flag = flag + 1
set cpNode = myChildDIVs.item(i).firstChild.getElementsByTagName("A").item(0).attributes
myhref = myChildDIVs.item(i).firstChild.getElementsByTagName("A").item(0).href
If i < 1 Then
Systemutil.Run "C:\Program Files\Internet Explorer\iexplore.exe", "", "", "open"
Browser("Browser").Navigate myhref
End If
strCompanyName = myChildDIVs.item(i).firstChild.getElementsByTagName("DIV").item(1).innertext
content = content & strCompanyName & vbCrLf
End If
Next
End If
End If
msgbox attr
msgbox content

作者: msnshow 时间: 2010-11-30 22:52
比较难，就人工都很难

作者: dreamever 时间: 2010-12-1 11:43
1、首先获取当前关键词的搜索结果列表；
2、针对每个搜索结果，利用一个循环判断其内容中是否包含指定的关键词；
3、具体的通过标准需要根据搜索功能的需求规格来，例如是否必须完全匹配，是否要求关键词的顺序一致，是否运行只包含部分关键词；然后记录结果即可

作者: fredick 时间: 2010-12-1 17:28
ding

作者: YapsiLee 时间: 2010-12-1 22:46
判断是否存在关键字。。。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)