51Testing软件测试论坛

标题: QTB测试新浪微博发布和删除功能--求指点 [打印本页]

作者: xiaotian2456 时间: 2014-6-29 22:37
标题: QTB测试新浪微博发布和删除功能--求指点
代码如下：

Services.StartTransaction "发送微博"
Dim datacount
datacount =DataTable.GetSheet("Action1").GetRowCount '获取本地表微博内容
For i=1 to datacount
wait(3)
Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("我的首页微博-随时随地分享身边的新鲜事儿").WebEdit("WebEdit").Click
Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("我的首页微博-随时随地分享身边的新鲜事儿").WebEdit("WebEdit").Set ""+DataTable("content",dtLocalSheet)+""
Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("我的首页微博-随时随地分享身边的新鲜事儿").WebEdit("WebEdit").Click
wait(3)
Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("我的首页微博-随时随地分享身边的新鲜事儿").Link("发布").Click
DataTable.GetSheet("Action1").SetNextRow
Next
Services.EndTransaction "发送微博"

Services.StartTransaction "删除微博"
Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("我的首页微博-随时随地分享身边的新鲜事儿").WebElement("微博").Click '转到删除页面
Do while Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("淘宝潮流馆的微博_微博").Link("@小冰").Exis
Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("淘宝潮流馆的微博_微博").Link("删除").Click
wait(3)
Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("淘宝潮流馆的微博_微博").Link("确定").Click '删除确定点击 wait(3)
Loop
Services.EndTransaction "删除微博"

问题：
1.删除一条微博后，会弹出确定框，对应代码里“Link（确定）” 这个标签。当第一次点击确定按钮之后，确定按钮还是存在页面的，只是display=none。第二次删除的时候执行红色那段代码，就会获取2条删除数据。怎么解决呢？没有ID号

作者: Shawn_xiao 时间: 2014-7-11 16:59
回复 1# xiaotian2456

可以在对象库中把Browser("我的首页微博-随时随地分享身边的新鲜事儿").Page("淘宝潮流馆的微博_微博").Link("确定") 的visible属性加上，并设置成true

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