Watir Popup对象处理

Watir基于处理，继承于web，document的对象提供较好的支持方法，但相对于处理windows对象较弱. 就目前从各网站收集的对象来看, 基本上，对于在IE实例对象打开的web标准对象能够成功识别与操作，其它的脱离当前IE窗口，打开的所有弹出框都不能正常识别。其中，弹出框对象占有异常对象识别中很大一部分。

E)dp0Xj].]k0目前碰到的弹出框, 我把他们分为三大类型：

T4@3Q5Em^01， Alerts 警告作用，如：sorry, 当前用户没有权限操作

2， Confirm 需要操作按钮, 如：你确认要删除当前记录？51Testing软件测试网]^"L;xh Ge

3， Prompt+ select +confirm  需要用户输入，操作查询或点击, 最后确认, 如：Download/upload (浏览+选择文件)

Z(m+^^+_0 51Testing软件测试网7{x0Rz},H

下面给出，上面几种弹出框watir实现识别与操作的方法，51Testing软件测试网G8yA:J2U

F&b5^?|&k9W05.1. 弹出框基于autoIT + 线程实现方式

$@8K/e![3?/xk0此种方法，对于第一、二种弹出框操作较有效，

_fZ"HH4@R0因点击某个link/button等对象，而弹出的窗口(大部分弹出框可应用此种方式来实现。)

{_7i'~5OZ.r}V01, 定义方法51Testing软件测试网7|4r-TTE%Wp
o/P

a*_Cf_o@0def check_for_popups

2}m*a
YV)[BhN;z0    autoit = WIN32OLE.new(’AutoItX3.Control’)

    #

"Vf6YT2F'^cG#p0    # Do forever - assumes popups could occur anywhere/anytime in your application.

    loop do51Testing软件测试网is,G$N5Y.]4hye

/rPw/x$Z9f0        # Look for window with given title. Give up after 1 second.51Testing软件测试网B)\!vS-S0l

        ret = autoit.WinWait(’消息 — 网页对话框’, ”, 1)

Iuh({e.]5G0        #ret = WinActivate(”Microsoft Internet Explorer”, “”)

       #autoit.ControlClick(”Microsoft Internet Explorer”, “”, “[CLASS:Button; INSTANCE:1]“, 2)51Testing软件测试网](k7F1Z1YBE

KY tEy,e0        puts(ret)51Testing软件测试网G?nT!v2lT |

CKQ}b3U;Z0        #

        # If window found, send appropriate keystroke (e.g. {enter}, {Y}, {N}).

        if (ret==1) then autoit.Send(”{Enter}”) end51Testing软件测试网9D#@
{#AAzm[N

        #51Testing软件测试网;e:qDQvF

7z E+e1a,l7VI:V0        # Take a rest to avoid chewing up cycles and give another thread a go.51Testing软件测试网 g8R|.g"_4I)VF

1LV%Cmw)Hwz3N0        # Then resume the loop.51Testing软件测试网F.OQa1rf5sD0g

        sleep(3)51Testing软件测试网i)Pz@nG

T xe$K.]/{i0    end

E2G!jq e,z0  end51Testing软件测试网P]3a(le ]@

7G,Qr-~'z5I0程序体代码51Testing软件测试网L(OE_Gp%D$fR

I_#Xi| L@0ie.button(:name, “signin”).click_no_wait51Testing软件测试网q.WF+X;nb6}R7S+L

WG4@y(|0sleep(20)

2VQ+B/K*^.p1\n6I8z0$popup = Thread.new { check_for_popups }  # start popup handler

8B*vnhp0at_exit { Thread.kill($popup) }

 51Testing软件测试网Ctb-S$f%XbD

RSstCm0 Call 另一ruby文件51Testing软件测试网|1u1?.@[&YO

对于第二种弹出框，像安全警告点击, 并不通过操作与点击任何对象, 即呈现弹出窗口。51Testing软件测试网O/J6\O,wrP o d_.hZ)F

我尝试用3.1方法来实现，不成功。用下面方法替代：51Testing软件测试网1K;S#GIo MA
1, 在watir/WindowHelper.rb文件中增加方法51Testing软件测试网O4p8{N2ma

   def push_security_alert_yes_cn

        @autoit.WinWait “安全警报”, “”

        @autoit.Send “{TAB}”

        @autoit.Send “{TAB}”51Testing软件测试网Ipa Z0p1vL.ZX {9W

        @autoit.Send “{SPACE}”

      End

T|:v |A%Y!Zb02, 定义另一调用文件 tmp.rb51Testing软件测试网 c[U{7FH([%q

Nb)YeO*{P!b&xX0require ‘watir/WindowHelper’51Testing软件测试网C&]f^W&A3Rw`

AC2JB][?.K0helper = WindowHelper.new51Testing软件测试网;F2ZC5Whw~LZm l

o$]HZ'kw!o^ O0helper.push_security_alert_cn_yes51Testing软件测试网H.bKIb)lY KY
3, 在打开安全URL之前，启动调用ruby文件51Testing软件测试网VnU8r(rru

~MF"?T0require ‘rubygems’51Testing软件测试网*j;N@[l2h(X

scDt-I^ G/a0require ‘watir’   # the watir controller51Testing软件测试网/Jq:o;pj"f

require ‘win32ole’

require ‘watir/WindowHelper’51Testing软件测试网 nZlr1A2I-["k
Thread.new{system(’ruby c:\tmp.rb’)} #你定义tmp文件存放路径

`y?h,gh0ie = Watir::IE.new51Testing软件测试网/E/eKV,C9D$P

ie.goto(”http://www.alipay.com.cn/“)51Testing软件测试网)l;[|[6^Sk

;?7IV;l fz.U#kC0 

onp'\%Pf4T(sS0修改框架底层51Testing软件测试网5F XeZ G&V+~%i

^(uC3z@+g%Z6es0此种方法，针对弹出框3.51Testing软件测试网{T3X5X,mA

举例一， 上传下载文件

CGB(YC.@Q-K01, 修改底层代码input_elements.rb文件,51Testing软件测试网 R#l-co3imi

类 FileField中, 方法set.51Testing软件测试网z7{t}io+\~ WJ

K\(]n#_0M.c}0为了支持中文，有一句替换修改为：

]Ta#WS.b
v:SRA0system(”rubyw -e \”require ‘win32ole’; @autoit=WIN32OLE.new(’AutoItX3.Control’);waitresult=@autoit.WinWait
DU#jP&~;F:b~x&r#OU0‘
8U s,LR\if1F0选择文件’, ”, 15; sleep 1; if waitresult == 1\” -e51Testing软件测试网*~&wn+_t-V
\”@autoit.ControlSetText ‘选择文件’, ”, ‘Edit1′, ‘#{setPath}’;
6O(zdQl0@autoit.ControlSend ‘选择文件’, ”, ‘Button2′, ‘{ENTER}’;\” -e \”end\”")51Testing软件测试网$xm+m)w1e_-b
2, 定义方法51Testing软件测试网,T(nkl0} I3s+l]

%qA{$Yh0def save_file(filepath)51Testing软件测试网)_E#|a2eR_

L6}1N,NEJc$i;d,T0    ai = WIN32OLE.new(”AutoItX3.Control”)

ohk^j F2}F0    ai.WinWait(”文件下载”, “”, 5)

K3Z[!hx*n7_m!\0    ai.ControlFocus(”文件下载”, “”, “保存(&S)”)51Testing软件测试网6H}-`-}$@6s"yFyP

clj
]H^~c0    sleep 151Testing软件测试网4mf%d{DLH-~

    ai.ControlClick(”文件下载”, “”, “保存(&S)”, “left”)

L rK.T@Z'F0    ai.WinWait(”另存为”, “”, 5)51Testing软件测试网-c{kY3I

;^f"vv S8I,_0    sleep 151Testing软件测试网a
I'zu.x!x0X;HU

DBl%p.dgB2]K0    ai.ControlSend(”另存为”, “”, “Edit1″,filepath)51Testing软件测试网B"d"h2x/n9U|

}&D[(i/hao_0    ai.ControlClick(”另存为”, “”, “保存(&S)”, “left”)51Testing软件测试网]d*X.],I;K[3pr

    ai.WinWait(”下载完毕”, “”, 5)

JpV3quJ4_0    ai.ControlClick(”下载完毕”, “”, “关闭”)51Testing软件测试网$j#f(l*J @ d

  end
&r3[_(n Dh.oX Q03, 程序体代码：51Testing软件测试网kR1a2uV o'R:[

g'C)I!^E0ie.file_field(:name, “xlsfile”).set(”c:\\samenameobject.html”)51Testing软件测试网9@ig4K2C5V

#上传你所指定的文件

{+[~}k Yc}2yfe0或51Testing软件测试网*k#PcLV

C-N$^!Y"h4D0ie.span(:text, “导出Excel表”).click_no_wait

%T/dy nA6O.f/S0save_file(”C:\\abc.xls”)

+a"L)XZu M"b0#下载到你所指定的路径51Testing软件测试网WfEM&C~*p$Z-~

 51Testing软件测试网M-V H!p+x^@

!^o8A$pC%Ob0针对弹出框3, 需要用户介入查询并操作:51Testing软件测试网T J[+u7q

举例二， 中供crm中类目与客户选择的弹出框，与第一种实现方式不同在于，51Testing软件测试网y'{i,o^X\

8Za@4i^
?N7f-o)J'M0用到autoit中WinActivate与ControlClick方法，
VBWr c)z*T|e7V}Z0require ‘rubygems’

!`l
X"w2UM0require ‘watir’   # the watir controller

 require ‘watir/WindowHelper’51Testing软件测试网{M4x}&K
A

require ‘win32ole’51Testing软件测试网xmX4tZ/r3Bo
def check_for_popups51Testing软件测试网#_f5Nh_:M g

D"Pyr]X p S:P8D0 51Testing软件测试网6h]7I~3F0CA

gDa/V&Y}0autoit = WIN32OLE.new(’AutoItX3.Control’)

loop do

]]eZ:fV5m0      ret = autoit.Winwait(”选择 — 网页对话框”, “”, 1)51Testing软件测试网['Gg B o

N8c1qb&Vqs_0      puts ret

QMl7omZw{
yR7|0     if (ret==1) then51Testing软件测试网0wnwx:F V;tr

       autoit.WinActivate(”[CLASS:Internet Explorer_TridentDlgFrame]“, “”)

      autoit.Send(”{TAB}”)

9ARE
@np0      autoit.Send(”{TAB}”)51Testing软件测试网4{ms9W8@4K*cFj

      #autoit.Send(”湖州”)

      #autoit.Send(”{ASC 2709}”)

      #autoit.SendUnicode(”a”)51Testing软件测试网$J0G D%L
Q
]U|#f2Z2L

      #autoit.ClipPut (”杭”)51Testing软件测试网 a9| |"S/S,_ }

4y-g;R+sl4s0      #autoit.ClipGet51Testing软件测试网;Df0evMZ%E

      #autoit.ToolTip “This is a tooltip杭州”, 0, 051Testing软件测试网c8f[Z?

f;Og)SY gz0      #autoit.Sleep 2000  

n%_{K+l+Z?0 51Testing软件测试网2{,_Z9}_1`

      autoit.Send(”{TAB}”)

      autoit.Send(”{TAB}”)51Testing软件测试网w@3p;L(^

      autoit.Send(”{Enter}”)

      autoit.WinActivate(”[CLASS:Internet Explorer_TridentDlgFrame]“, “”)51Testing软件测试网)VL*AH+f{,K

      autoit.ControlClick(”选择 — 网页对话框”, “”, “[CLASS:Internet Explorer_TridentLstBox; INSTANCE:2]“, 2)51Testing软件测试网u+O-l]"j)B

P+l&q/]s&[T0      autoit.Send(”{TAB}”)

|n-y a(d'eN0      autoit.Send(”{Enter}”)51Testing软件测试网t#o:nwwg3Z&q

^2k2|9b\0      autoit.Send(”{TAB}”)51Testing软件测试网d'v7@2env#}

      autoit.Send(”{TAB}”)

      autoit.Send(”{TAB}”)51Testing软件测试网&D\p'QZA,}C

Q+m;K!e}0      autoit.Send(”{TAB}”)

      autoit.Send(”{Enter}”)

5qSMA2C.Y(byM~1o0    end51Testing软件测试网3mV {}rdR i;S8sBq

y~/N(rX0    sleep(3)

  end

@6ZLO~(nm0end
-tM2|\ j2e/\0ie=Watir::IE.new51Testing软件测试网U!I[S"bp$Mz

ie.goto(”http://10.2.6.4:5100/bin/member/signin“)

qTq{LsR0#ie.goto(”http://10.2.6.4:5100/“)
L][-VXg RZ,_I0#ie.element_by_xpath(”//span[contains(text(), 'Main Road Nijmegen')]“).click51Testing软件测试网 ? ?.v}W4ui

ie.text_field(:name, “id”).set(”mhl1805″) 51Testing软件测试网%tC$vL%X}J

!_ q+BI]s~F!Zw
A-s0ie.text_field(:name, “password”).set(”zxcvbnm”)

ie.button(:name, “signin”).click51Testing软件测试网7gV{pg0K['u|
ie.frame(:name, “left”).link(:url, “http://10.2.6.4:5100/v3/help_cust.htm”).click51Testing软件测试网5p.u"gojY

1]Z]X&r
d(m0ie.frame(:name, “left”).link(:text, “新签中供客户”).click51Testing软件测试网'?Z-F)`d3`z M0Q @l
?

Y?
yy/dJ\0 # start popup handler
E MZ#oDul0ie.frame(:name, “right”).frame(:name, “rtop”).button(:value, “选择客户”).click_no_wait51Testing软件测试网7VQ1~4R%Rq;o

sleep(20)

#X ^la zF0$popup = Thread.new { check_for_popups }51Testing软件测试网PMAr2?kHy

at_exit { Thread.kill($popup) }

5f@R9m5e*i J0针对第三种popup window, 如果需要与用户交互，且需要输入中文时，若用autoit sendkey对待中文支持(但官方文档说支持中文输入, 网上有不少人和我遇到同样问题)，尚没有找到有效方案，有待进一步跟进。

{$N-?+o+z\@8e0   除上述弹出框需要特殊处理外，watir中也有一些扩展tag，或第三方控件需要特殊处理的，51Testing软件测试网C)tR{6\W.kr5R,i

   像：51Testing软件测试网
X6mAW(KjJ_a

!rw
C IP%`.r:En0 

web HTML编辑器51Testing软件测试网"ae5M^
R4B8|4]m

/Az`$cunU:Z.U+X8R0中文站的html编辑器提供: 操作ID或name操作起来较方便直接

require ‘rubygems’51Testing软件测试网uOb)P|.f3|

require ‘watir’   # the watir controller51Testing软件测试网'xg8J#`]}v|

require ‘watir/WindowHelper’

/K+k/~ e0G0require ‘win32ole’

VV [d&}
U$i'{Q0ie=Watir::IE.new51Testing软件测试网;ga0hw`

ie=Watir::IE.attach(:title, /阿里助手/)

 51Testing软件测试网"U1x]]h^L)~

ie.text_field(:name, “_fmo.a._0.s”).set(”mhl1805″) 

ie.document.getElementByid(”_editor”).contentWindow.focus()51Testing软件测试网}!^VZ T [6l(Rj

ie.send_keys(”abcsadfasfd”)
'~-d"Xa9H2a _ V|h,fz0但也碰到有些web页面，不提供任何ID，只能用autoIT方法来send tab实现51Testing软件测试网]+?"vrzp
require ‘rubygems’51Testing软件测试网.jC;J \"r/n9F:M1J0fZ9@`b

]5Bnc)WQE0require ‘watir’   # the watir controller51Testing软件测试网5{zG Uyci

$f'n$X8k+r#b$CTu0require ‘watir/WindowHelper’

(h8t6a#sg \AH
GX0require ‘win32ole’51Testing软件测试网,hQI DeS

51Testing软件测试网u1X)j!k\{r
ie=Watir::IE.new

#ie=Watir::IE.attach(:title, /Alibaba/)51Testing软件测试网wt2}DdOBn

_y)|*s*erA0ie.goto(’http://us.my.alibaba.com/product/buyoffer/post_buying_lead.htm’)

ZBKL7h-\V0ie.text_field(:name, “_fmp.bu._0.su”).set(”mhl1805″) 51Testing软件测试网Y#M3g ]k*f|
S*a

ie.text_field(:name, “_fmp.bu._0.su”).set(”中国人”) 
$g)`:ZS
n+LU'x8e0ie.checkbox(:id, “detailDesc”).set

4I1o3@EGF_0ie.checkbox(:id, “detailDesc”).focus()51Testing软件测试网z*UreA

ie.send_keys(”\t”*9)

@9F.Y2Jf"E7p0ie.send_keys(’Hello Worldabcdef’)51Testing软件测试网6e"uj)k T]3w zO'_

51Testing软件测试网n|;X)K;iWn
对象识别其它常用TAG内置方法引用

3\)I'}'t:MLD-bd0如：IE.div , ie.span, ie.cell, ie.table方法，可以实现点击操作，取值操作等.51Testing软件测试网[+D4^v(j(j

另外提供QTP51Testing软件测试网l{y,u pM`
51Testing软件测试网mF"a%~A@`|M$I
类似描述性编程，同类型对象统计：

(F;d@G7j2H0ie.buttons.each { |b| puts b.to_s }51Testing软件测试网jX,d"vzz

 puts ie.checkboxes.length  

[w7Cz
e]!d+W0 puts ie.links.length 

zO+~nx Z0 puts ie.buttons.length等等 

-j,Nr*R!] o0对于常用的innertext属性, 在watir中已经封装到方法，可以直接引用。如：51Testing软件测试网%m8kXI8V+^h

ruby在对象识别底层，封装了innertext51Testing软件测试网U|&{`&m6F;BF

,m
B(m _ d(MR4T0实现，调用方法text即可：51Testing软件测试网6toKnYBK.AC

如：puts ie.div(:id, “intelligentWord”).link(:id, index.to_s).text51Testing软件测试网?}%R,CA @t

,Zit3u~Pt"f P0最后：返回文本与源代码，用下面方法：51Testing软件测试网2qp%@
J4Sct

puts ie.text()

F-_9YV9c(S'q0puts ie.html() 

p)OP)ai?w$n0 

识别对象正则表达式支持51Testing软件测试网1xf+k9]3a Ns

当然，ruby提供强大的正则表达式支持，如：属性标识正则

t;Kc1K;R[C"Fc#|0ie=Watir::IE.attach(:title, /Alibaba/)

Ruby的正则表达式以”//”作为基本框架，表达式内容位于”/”之间。表达式返回一个RegExp的对象。51Testing软件测试网Q&aq,A"h:^%ir$k

h#T:D5{K)?0表达式的一般规则:

/a/匹配字符a。51Testing软件测试网4jE[)S6w)aH_q9sU

/\?/匹配特殊字符?。特殊字符包括^, $, ? , ., /, \, [, ], {, }, (, ), +, *.51Testing软件测试网S0a,a-a6W0YK

%t-u7iwK/},u-?0.匹配任意字符，例如/a./匹配ab和ac。51Testing软件测试网.] n,DWz(g

/[ab]c/匹配ac和bc,[]之间代表范围。例如：/[a-z]/ , /[a-zA-Z0-9]/。

#DamV"R.oqIa0/[^a-zA-Z0-9]/匹配不在该范围内的字符串。51Testing软件测试网;H k6Oja:c

.S4U7a!WR0N&M0/[\d]/代表任意数字，/[\w]/代表任意字母，数字或者_，/[\s]/代表空白字符，包括空格，TAB和换行。

/[\D]/，/[\W]/，/[\S]/均为上述的否定情况。51Testing软件测试网1|n%T_\N E Z

关于正则其它用法，请参照《watir技术集锦》

4JN_ b7o$R!SZ0最后攻略

总之，对于对象识别与操作，要借助于上述文档中的, 灵活运用autoit, xpath与异常对象操作方法。对于watir不支持的windows控件，想到第一个方法，就是采用第三方autoit技术，来模拟键盘或鼠标操作。51Testing软件测试网0e%eb#f~]@0J } m

对于操作web对象，watir不支持特殊tag，除了扩展其底层代码外，只能深深研究一下xpath了.

0hY dRV`0最后，再搞不定，就只能到watir group里咨询高人了，呵呵。51Testing软件测试网,N;N|6f*QK3G&\&oS

__z|4k OM0尚没有碰到其它更好方法。。。51Testing软件测试网0JSd`|/fG\

 51Testing软件测试网*h&^%VbTN%mK

;H"] UW)J ?!n*D8H0 

t2|3sWi]w0但是针对以上几种方法，我曾经在测试自己公司产品的logout功能时，一直都不能实现。

:V4{-Hlk7r0后来寻求到另一种解决方案，代码如下：51Testing软件测试网*_Y\k0l%JUM8pu

require 'watir'
!X3|Yh[X
R0def check_for_popups(title="Microsoft Internet Explorer", button="OK")51Testing软件测试网 ML'_-q&f(v+p_;O
X
    popup=Thread.new{
%G&jTS3nY0        autoit=WIN32OLE.new('AutoItX3.Control')
6Wzk&wD%{ZT*UI0        ret=autoit.WinWait(title,"",60)51Testing软件测试网
Q;j!KE
q
       if(ret==1)
-V2N#\&l4L1h$f
]'KE(g0            puts"There is popup."51Testing软件测试网7~fl2A8R:KV m
            autoit.WinActivate(title)51Testing软件测试网f*qm_
Q[
            button.downcase!51Testing软件测试网+|
n*Q
v:ND
           ifbutton.eql?("ok") || button.eql?("yes") || button.eql?("continue")51Testing软件测试网
D,vgm)X"rZd
                autoit.Send("{Enter}")
8}h8WN{G?l0           else
(G9V"Npu/tP0                autoit.Send("{tab}")51Testing软件测试网VR3tF!yFjU!?.D-C3G
                autoit.Send("{Enter}")51Testing软件测试网3eJ,a7M1OnEXR
            end51Testing软件测试网["y
g0r	|*}
        elsif (ret==0)51Testing软件测试网&?&v!w/]k:Z I$o1}:K._
            puts"No popup, please check your code."
S@`X7X-^0        end51Testing软件测试网JA)E%X8Qx
_
    }51Testing软件测试网(j8mYgA\
    at_exit {Thread.kill(popup) }
r
WvWT0end
Pj:Mw#]%b1|v0
-H1U+E	f#SO-x6u0$ie.link(:text,//).click_no_wait
.j*T8Ge	y)a;zx0check_for_popups("MicrosoftInternet Explorer","OK")
fD.G)g]:DVOF0这个方法针对 Popup是 OK/cancel之类的弹出框比较有效。

)Qd}ch0
)X3Y#le#uE2n0
8H
pL
oHY0针对PopUp box的官方解决方法：51Testing软件测试网a|2o.R.F6i+p%IH
http://wiki.openqa.org/display/WTR/JavaScript+Pop+Ups51Testing软件测试网cXK-k*zn(y?,~/?

?{l7pT V	vb2B0