Watir Popup对象处理

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

目前碰到的弹出框, 我把他们分为三大类型：51Testing软件测试网$p2bj*b+Dw

$b)]c-VH+G0N0 51Testing软件测试网:~EH-yXgs

1， Alerts 警告作用，如：sorry, 当前用户没有权限操作51Testing软件测试网q
N y2M"DZH/n8L)~?

E)Hl$p d#M02， Confirm 需要操作按钮, 如：你确认要删除当前记录？

3， Prompt+ select +confirm  需要用户输入，操作查询或点击, 最后确认, 如：Download/upload (浏览+选择文件)51Testing软件测试网#]R}4B0G+h5cx,N^Lx4\

 51Testing软件测试网0CyG f7i1o

#Q~y|%W a^JH0下面给出，上面几种弹出框watir实现识别与操作的方法，51Testing软件测试网ou%IWOY~*ze

OqX/f2{rlv:mn05.1. 弹出框基于autoIT + 线程实现方式

A&~o`9g0此种方法，对于第一、二种弹出框操作较有效，

#HH`S.u!ETa#D0因点击某个link/button等对象，而弹出的窗口(大部分弹出框可应用此种方式来实现。)51Testing软件测试网+c'NF~Fe

G'i*FW1{8fL01, 定义方法51Testing软件测试网;j/h*ww,ks.Yp

def check_for_popups

8s\9N(d PZ'Ye6de0|~0    autoit = WIN32OLE.new(’AutoItX3.Control’)51Testing软件测试网l[;L&}3h0u

    #

}1B'tb4{"y!I2g0    # Do forever - assumes popups could occur anywhere/anytime in your application.

    loop do

j e4Ty5^0Ho[B)a LQ2B0        # Look for window with given title. Give up after 1 second.51Testing软件测试网l,I*J1SFdg1M

9T i$R#c9D5NR0        ret = autoit.WinWait(’消息 — 网页对话框’, ”, 1)51Testing软件测试网p:?H5ZqX2T

A
Jge,c f0        #ret = WinActivate(”Microsoft Internet Explorer”, “”)51Testing软件测试网pcb!e6h0Xm

I Ej'vh0       #autoit.ControlClick(”Microsoft Internet Explorer”, “”, “[CLASS:Button; INSTANCE:1]“, 2)

-ex"~](e#m0        puts(ret)

2s,YZIu%y`j0        #51Testing软件测试网0L1\1`:R7H5OI

K+}^J,`3Nk6o0        # If window found, send appropriate keystroke (e.g. {enter}, {Y}, {N}).

XO.Y1NS3a,d9_0^0        if (ret==1) then autoit.Send(”{Enter}”) end

w|\+W2@G(D8YD0        #51Testing软件测试网&zAv5dG)eu9r&d

1o]-T2J
UOFT:]E0        # Take a rest to avoid chewing up cycles and give another thread a go.51Testing软件测试网;S k{yiN7]

Sr4B3S"JT#R sA0        # Then resume the loop.

        sleep(3)51Testing软件测试网-rkB"z!y;L

,sN%{uU`0    end

(?s t z2I"X/I8b
WW0  end

o1MZ&rdgK0程序体代码

ie.button(:name, “signin”).click_no_wait

%n-q.xc9|3e4q0sleep(20)51Testing软件测试网@V }9Q+Q#G

*@7`8sY"| [k0$popup = Thread.new { check_for_popups }  # start popup handler

at_exit { Thread.kill($popup) }51Testing软件测试网n(HWC7J'x9ba,n

\NV? i0E;`*M0 Call 另一ruby文件51Testing软件测试网7L0i.b|5[8S2B

对于第二种弹出框，像安全警告点击, 并不通过操作与点击任何对象, 即呈现弹出窗口。51Testing软件测试网G%K.m&D1SJYoo,L

u1G+g_2S0我尝试用3.1方法来实现，不成功。用下面方法替代：
#VF
kB~u V F01, 在watir/WindowHelper.rb文件中增加方法51Testing软件测试网Ry7aPziz!u/zw+vy

yd_bX6H0   def push_security_alert_yes_cn51Testing软件测试网'X,x/D&k{Lr#M[O2E

!@ee ^0}0        @autoit.WinWait “安全警报”, “”

)D%i K B&i
]~0        @autoit.Send “{TAB}”51Testing软件测试网$N4^
^:~x#AK({

        @autoit.Send “{TAB}”

        @autoit.Send “{SPACE}”51Testing软件测试网)a n"y|S I

TqgU;EE0      End51Testing软件测试网K/[0@WX-q:Bp

/ZZ p
`*V
i02, 定义另一调用文件 tmp.rb51Testing软件测试网ETLUOM0g1C6Q

require ‘watir/WindowHelper’51Testing软件测试网 r;a-ar!g{

helper = WindowHelper.new

9AjQ{1a7S"\ir0helper.push_security_alert_cn_yes51Testing软件测试网 B/HM^$x&~
3, 在打开安全URL之前，启动调用ruby文件51Testing软件测试网HvE1J&d

_d?#H%B6I0require ‘rubygems’51Testing软件测试网u
oTsJ L4^9i

require ‘watir’   # the watir controller51Testing软件测试网&wcN%VU1^#D

require ‘win32ole’

require ‘watir/WindowHelper’
G
O1Jbp8G4Y#No0Thread.new{system(’ruby c:\tmp.rb’)} #你定义tmp文件存放路径

ie = Watir::IE.new

?Vpn/uf,oW O0ie.goto(”http://www.alipay.com.cn/“)

修改框架底层

;t+D7xO(]H:^ X0此种方法，针对弹出框3.51Testing软件测试网 bz qTH~6w:T}b

L6_?6k'H8P'n0举例一， 上传下载文件

Gl*y@7eUc01, 修改底层代码input_elements.rb文件,

类 FileField中, 方法set.51Testing软件测试网}n }+wup`nU

为了支持中文，有一句替换修改为：

M9g%s#e_"VX0system(”rubyw -e \”require ‘win32ole’; @autoit=WIN32OLE.new(’AutoItX3.Control’);waitresult=@autoit.WinWait51Testing软件测试网6a.zF1{s&g
‘
T;|B~y9Pq0选择文件’, ”, 15; sleep 1; if waitresult == 1\” -e
L8T0W C ]A0\”@autoit.ControlSetText ‘选择文件’, ”, ‘Edit1′, ‘#{setPath}’;51Testing软件测试网:f3i#A4app,EO:d
@autoit.ControlSend ‘选择文件’, ”, ‘Button2′, ‘{ENTER}’;\” -e \”end\”")
9wcr*M.d-Kyif02, 定义方法51Testing软件测试网1lK&b'c]o!H

gh ^!Gf4I"y0def save_file(filepath)

    ai = WIN32OLE.new(”AutoItX3.Control”)51Testing软件测试网3_ Hv SJ` V4W

)aW,\8{-y&x!yR0    ai.WinWait(”文件下载”, “”, 5)51Testing软件测试网9Lghs xf
M

o g4[UT0    ai.ControlFocus(”文件下载”, “”, “保存(&S)”)51Testing软件测试网0X6f voXIsE/A

    sleep 1

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

    ai.WinWait(”另存为”, “”, 5)

FlX5~S1t }bADo0    sleep 1

    ai.ControlSend(”另存为”, “”, “Edit1″,filepath)

    ai.ControlClick(”另存为”, “”, “保存(&S)”, “left”)

    ai.WinWait(”下载完毕”, “”, 5)51Testing软件测试网}sID_/BtV

V-b7x%yW(u'b0    ai.ControlClick(”下载完毕”, “”, “关闭”)51Testing软件测试网^v9G)\"tF(O E8g.gi

  end
+?c,h%|.A;B%Mt/O!by03, 程序体代码：

ie.file_field(:name, “xlsfile”).set(”c:\\samenameobject.html”)51Testing软件测试网P(R(u:K(K

#上传你所指定的文件

d`\nq} yG0或

C A7}p4@F0ie.span(:text, “导出Excel表”).click_no_wait51Testing软件测试网"I1q~"epRc@_

P:G/Wl|o:k ^@o0save_file(”C:\\abc.xls”)

#下载到你所指定的路径51Testing软件测试网+I6Y9r!H G]K

L:VA'Xc;e/x~0针对弹出框3, 需要用户介入查询并操作:

'Whe4P4?v0举例二， 中供crm中类目与客户选择的弹出框，与第一种实现方式不同在于，51Testing软件测试网JLRX;hcw

:vHS7zXGIA-W0用到autoit中WinActivate与ControlClick方法，
:Zv kEKR3L1e3~u0require ‘rubygems’51Testing软件测试网G:c.[%R.T`6\RT9u

akX xG${q j])}0require ‘watir’   # the watir controller

 require ‘watir/WindowHelper’51Testing软件测试网
con~ y5F+a2q"V
K8[%l

 51Testing软件测试网D?`p-~v

require ‘win32ole’51Testing软件测试网&Yn|6d#g.|
def check_for_popups

 51Testing软件测试网0@l
IC,d_,l/|+]

autoit = WIN32OLE.new(’AutoItX3.Control’)

loop do51Testing软件测试网!M2L m?)E4JRlN

      ret = autoit.Winwait(”选择 — 网页对话框”, “”, 1)51Testing软件测试网ma+M,jI*i-`(qiK(}

      puts ret

     if (ret==1) then

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

\/HP3B l
J"z0ox0      autoit.Send(”{TAB}”)

      autoit.Send(”{TAB}”)51Testing软件测试网;H0yi&a;r,ql$R

      #autoit.Send(”湖州”)

:G/D$qR+H _G]#b0      #autoit.Send(”{ASC 2709}”)51Testing软件测试网+lX1f
fCu/SZr

;C"}HX$t"O9^0      #autoit.SendUnicode(”a”)

2HTQ5GE.[X0      #autoit.ClipPut (”杭”)

      #autoit.ClipGet

&IBziV!OF0      #autoit.ToolTip “This is a tooltip杭州”, 0, 0

DS.V_9W&DSU"ZJX]A0      #autoit.Sleep 2000  

 51Testing软件测试网.ZO^(}0s'v+H

,Y#B;BSr*H)RH0      autoit.Send(”{TAB}”)51Testing软件测试网~eoh(P/r-I
Y

Vy,nc0L#F0      autoit.Send(”{TAB}”)51Testing软件测试网 J,m-~:{y-i

      autoit.Send(”{Enter}”)51Testing软件测试网vHt
x/g0Y1kE

a|9KR;Um6?9S"g0      autoit.WinActivate(”[CLASS:Internet Explorer_TridentDlgFrame]“, “”)51Testing软件测试网5q0^;n[ rl

      autoit.ControlClick(”选择 — 网页对话框”, “”, “[CLASS:Internet Explorer_TridentLstBox; INSTANCE:2]“, 2)

      autoit.Send(”{TAB}”)51Testing软件测试网mHN,vLB.qoJ#y

tQN S'sS/^3QC#G0      autoit.Send(”{Enter}”)51Testing软件测试网-rB~N%^

:SQ
u/{1k'nU0      autoit.Send(”{TAB}”)51Testing软件测试网S*x-x!v{@

$V&u(S.R8CT:|0      autoit.Send(”{TAB}”)

      autoit.Send(”{TAB}”)51Testing软件测试网 t(A7gU.u3rL Q]

      autoit.Send(”{TAB}”)

)R K/sd I~%D0      autoit.Send(”{Enter}”)

    end

    sleep(3)

  end

K%hT+{U8^[B{F9g Z0end
Oib1LwqQ0ie=Watir::IE.new

S
R0b"}"m~0ie.goto(”http://10.2.6.4:5100/bin/member/signin“)51Testing软件测试网FRA(O!TJ\|

#ie.goto(”http://10.2.6.4:5100/“)51Testing软件测试网jt8I1iS'qPf?
#ie.element_by_xpath(”//span[contains(text(), 'Main Road Nijmegen')]“).click

ie.text_field(:name, “id”).set(”mhl1805″) 

4W%TwzZu?Iq/T0ie.text_field(:name, “password”).set(”zxcvbnm”)51Testing软件测试网RS0TuCSVX

ie.button(:name, “signin”).click
V+Amf.`k0ie.frame(:name, “left”).link(:url, “http://10.2.6.4:5100/v3/help_cust.htm”).click51Testing软件测试网B#rDaI3C

Q1A;I"h+E+a0ie.frame(:name, “left”).link(:text, “新签中供客户”).click51Testing软件测试网/d6DI,bAJ7v1{

u n8@
~V(d0 # start popup handler
a2d1v"VnVQ$SK)P'Ac0ie.frame(:name, “right”).frame(:name, “rtop”).button(:value, “选择客户”).click_no_wait

,G9Q'~;[ A:^4dz0sleep(20)

$popup = Thread.new { check_for_popups }51Testing软件测试网6H%vl
I?A

-@,k'|(di'V#P0y$nl0at_exit { Thread.kill($popup) }51Testing软件测试网,OUU7{S-m)wZ_P

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

p(PqNkzruUl0   除上述弹出框需要特殊处理外，watir中也有一些扩展tag，或第三方控件需要特殊处理的，

ob9E_1nbvT8H"b0   像：51Testing软件测试网*y7u~$s`0Nf

 51Testing软件测试网f$epM(Tz+C}

eJc$?Dz0S)}XT0web HTML编辑器

中文站的html编辑器提供: 操作ID或name操作起来较方便直接51Testing软件测试网t4sZ(f&~5C3ev

l?bdm*B n El0require ‘rubygems’

~ @g*P&T0require ‘watir’   # the watir controller

]4E
T6@@+S0require ‘watir/WindowHelper’

require ‘win32ole’51Testing软件测试网b;Ba6|p

ie=Watir::IE.new51Testing软件测试网6b/Z(N
` v+x M

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

\Q3yl:SsE0ie.text_field(:name, “_fmo.a._0.s”).set(”mhl1805″) 51Testing软件测试网sm/P#F!vh6M\!@'bG

ie.document.getElementByid(”_editor”).contentWindow.focus()

ie.send_keys(”abcsadfasfd”)
1cf F(HFtM!B0但也碰到有些web页面，不提供任何ID，只能用autoIT方法来send tab实现
o-Q-P1E wMAO0require ‘rubygems’

require ‘watir’   # the watir controller

kA vw9[e0require ‘watir/WindowHelper’

)W,? q#LPVdu#j0require ‘win32ole’51Testing软件测试网
v
q4z/e5`Vq]m kd

[S1\7S:q^6J0
%A}k!xV ~0ie=Watir::IE.new51Testing软件测试网NIbP7N;`

g
~&Q[*dX;X0#ie=Watir::IE.attach(:title, /Alibaba/)

ie.goto(’http://us.my.alibaba.com/product/buyoffer/post_buying_lead.htm’)51Testing软件测试网2G^!~J^5s

ie.text_field(:name, “_fmp.bu._0.su”).set(”mhl1805″) 51Testing软件测试网KF1I,o)d r4LT$g

C.fn8A}0ie.text_field(:name, “_fmp.bu._0.su”).set(”中国人”) 51Testing软件测试网}3i UCQF@I2Y
ie.checkbox(:id, “detailDesc”).set51Testing软件测试网R w{H"f%HAD3q4V F

8W?O?2MD,?0ie.checkbox(:id, “detailDesc”).focus()51Testing软件测试网1?t8Rsb'i}%s B

_rIlr9nB0ie.send_keys(”\t”*9)

@?&Y#YBc%j4n a(w,J0ie.send_keys(’Hello Worldabcdef’)51Testing软件测试网Ti7}.m\6s`3ze m |

xqpY_W0
@_&WG \? {0对象识别其它常用TAG内置方法引用51Testing软件测试网hciZ?6y

7x5iIBZb0如：IE.div , ie.span, ie.cell, ie.table方法，可以实现点击操作，取值操作等.51Testing软件测试网5[bE;p!`1aK,@

2q?HA#^]0另外提供QTP51Testing软件测试网S!v:gU `_!g:LyU
51Testing软件测试网x9]'zZY+YK)G(k4b
类似描述性编程，同类型对象统计：

ie.buttons.each { |b| puts b.to_s }

h)Sx6U"Kn0 puts ie.checkboxes.length  51Testing软件测试网1d"sYH[yr

zr_uTIx!X0 puts ie.links.length 

i t"LL/u0 puts ie.buttons.length等等 51Testing软件测试网Xs JI\%pO

C'Y O3^ZWGo0对于常用的innertext属性, 在watir中已经封装到方法，可以直接引用。如：

ruby在对象识别底层，封装了innertext

X!Y
c!?4KWNX_0实现，调用方法text即可：

如：puts ie.div(:id, “intelligentWord”).link(:id, index.to_s).text

最后：返回文本与源代码，用下面方法：

puts ie.text()51Testing软件测试网x ? hCA [f

F3X+O(P(Ok4g0puts ie.html() 51Testing软件测试网j|v|M)[

9q s#dC8Y0{F7H
L
P&C0 

识别对象正则表达式支持

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

6n&R@&QE5_1`xtY/b0ie=Watir::IE.attach(:title, /Alibaba/)

Ruby的正则表达式以”//”作为基本框架，表达式内容位于”/”之间。表达式返回一个RegExp的对象。

G`+m4Z7xCDz&t0表达式的一般规则:

$jA+}{%xKI8^0/a/匹配字符a。51Testing软件测试网2@L'uTu

/\?/匹配特殊字符?。特殊字符包括^, $, ? , ., /, \, [, ], {, }, (, ), +, *.

'?4B v3P ^
A}tQY4U0.匹配任意字符，例如/a./匹配ab和ac。

/[ab]c/匹配ac和bc,[]之间代表范围。例如：/[a-z]/ , /[a-zA-Z0-9]/。51Testing软件测试网{&} y0n,t:}
MJ,G{

w$J1il2K6J7NMP0/[^a-zA-Z0-9]/匹配不在该范围内的字符串。51Testing软件测试网#_.a@h|9?qY#a

H6jK%@gj ]0/[\d]/代表任意数字，/[\w]/代表任意字母，数字或者_，/[\s]/代表空白字符，包括空格，TAB和换行。

6Oc0D!y%`e0/[\D]/，/[\W]/，/[\S]/均为上述的否定情况。51Testing软件测试网JK.N&\2`vT"v C

关于正则其它用法，请参照《watir技术集锦》51Testing软件测试网+H'wGGUQg/\.c5nA

B)W2~Vn|#Fg0最后攻略

`:z/rw`;y7l1oS0总之，对于对象识别与操作，要借助于上述文档中的, 灵活运用autoit, xpath与异常对象操作方法。对于watir不支持的windows控件，想到第一个方法，就是采用第三方autoit技术，来模拟键盘或鼠标操作。51Testing软件测试网Eg,e,_/~xg/g

*|)k [^ }
fl0对于操作web对象，watir不支持特殊tag，除了扩展其底层代码外，只能深深研究一下xpath了.51Testing软件测试网ljw;FVG

最后，再搞不定，就只能到watir group里咨询高人了，呵呵。

0wS7S(Y2A0尚没有碰到其它更好方法。。。

 51Testing软件测试网n\Ml FQ p

([0v.NX_
]S0但是针对以上几种方法，我曾经在测试自己公司产品的logout功能时，一直都不能实现。

后来寻求到另一种解决方案，代码如下：51Testing软件测试网,L]7ZaoQW+u'M u

require 'watir'51Testing软件测试网7x7SSo!w W5a"o&L
def check_for_popups(title="Microsoft Internet Explorer", button="OK")51Testing软件测试网P^2HR7j"m&J`2C
    popup=Thread.new{51Testing软件测试网'e(~jy6u
bm.u
        autoit=WIN32OLE.new('AutoItX3.Control')
fG;XcC-q1}9_0        ret=autoit.WinWait(title,"",60)
a5f;}
CvQW4`0       if(ret==1)51Testing软件测试网/C3frH
d~
            puts"There is popup."
Ok:uRk:t
p0            autoit.WinActivate(title)51Testing软件测试网e]&u0]8MXis
            button.downcase!51Testing软件测试网YVs,M"kJ5R
           ifbutton.eql?("ok") || button.eql?("yes") || button.eql?("continue")
B-no+lIJ_0                autoit.Send("{Enter}")
+m KL'qq0           else
Ew\jx(k6hH#I0                autoit.Send("{tab}")
/p
Th(]&r(tv0                autoit.Send("{Enter}")
e#Sn&xG/S;z0            end
n%\*UK*s(v:y0        elsif (ret==0)
 {1oj}l7v0            puts"No popup, please check your code."51Testing软件测试网6E7R._5{\Gr
lQB
        end51Testing软件测试网r1k Sa[wc:o
    }

x:X4tMO[]KP
o$A0    at_exit {Thread.kill(popup) }
$j@%d:Hv9kA0end51Testing软件测试网1kx4cP2jk
51Testing软件测试网)c!~B%j v
U0|%c
E
$ie.link(:text,//).click_no_wait
!jyA$I'F
PF(Di0check_for_popups("MicrosoftInternet Explorer","OK")
]	A1S	A+^-n0这个方法针对 Popup是 OK/cancel之类的弹出框比较有效。

51Testing软件测试网ks\9GCi

V6sWz,C W051Testing软件测试网h&w0r4}Mn
B-T
针对PopUp box的官方解决方法：51Testing软件测试网k-hU/v5|1z2mB]
http://wiki.openqa.org/display/WTR/JavaScript+Pop+Ups
2Gkb%[V0
_m tp_Q$\Y	R0