空间管理您的位置: 51Testing软件测试网 » 子木清风 » 日志

不要追求绝对的公平，红尘之中没有公平而言，人活一世，难得糊涂。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　it is no use doing what you like, you have got to like what you do.

针对popups类对话框的watir处理方法之三

上一篇 / 下一篇 2009-09-16 15:39:38 / 个人分类：ruby_watir

查看( 585 ) / 评论( 0 ) / 评分( 0 / 0 )

每日随笔

每日随笔:

针对该警示框的识别问题：

这个比较简单点。。。

require 'watir'
require 'win32ole'
require 'watir/WindowHelper'
# 登陆
$ie_site ='http://members.shaw.ca/paul_rogers/watir_tests/popups1.html'
#$f = 'E:\WorkSpace\00-Automation\03_MOA\02_Branches\JiangXi\V2.9.1\Lib\db1.vbs'
$ie = Watir::IE.new
$ie.goto $ie_site
#$ie.buttons.each {|f| puts f.to_s}

$ie.button(:value,"Alert").click_no_wait
sleep(7)
autoit = WIN32OLE.new("autoitx3.control")
$a = autoit.WinWait("Microsoft Internet Explorer","",1)
puts $a
$b = autoit.ControlGetText("Microsoft Internet Explorer","","Static2")
puts $b
$c = autoit.ControlClick("Microsoft Internet Explorer","确定","Button1")
puts $c

$a $b ￥c 结果为1的时候为通过~！
相关函数用法：

ControlGetText：
ControlGetText ( "title", "text", controlID )
Function ControlGetTextSuccess: Returns text from a control.
Failure: Sets @error to 1 and returns a blank string of "".

收藏举报

TAG:

查看全部评论