使用IE Automation技术制作的投票机器人

好处就是没有任何兼容性问题,除非网站不支持用IE浏览:)

.Constant { color: rgb(255, 0, 255); }.PreProc { color: rgb(160, 32, 240); }.Statement { color: rgb(128, 64, 64); font-weight: bold; }pre { color: rgb(0, 0, 0); background-color: rgb(255, 255, 255); }body { color: rgb(0, 0, 0); background-color: rgb(255, 255, 255); }.Comment { color: rgb(0, 0, 255); }



#
-*- coding: mbcs -*-





#
说明: 使用了cPAMIE模块,



#
连续投10000次票



poll_num
=
10000





import
random



import
time



import
cPAMIE



#
处理javascript弹出窗口



import
cModalPopUp







ie
=
cPAMIE.PAMIE()



for
j
in
range(poll_num):



user
=
"
g
"
+
str(random.randint(
1
,
1000000000000
))





#
注册新用户



ie.navigate(
" http://somewhere/Registry.aspx "
)



ie.textBoxSet(
"
tbUsername
"
,user);



ie.textBoxSet(
"
tbPassword
"
,user);



ie.textBoxSet(
"
tbPwdConfirm
"
,user);



ie.textBoxSet(
"
tbEmail
"
,user
+
"
@hotmail.com
"
);



#
提交



ie.buttonClick(
"
btnOK
"
)





#
提交成功



if
(ie.locationURL()
==
" http://somewhere/RegistryFinish.aspx "
):



#
登陆



ie.navigate(
" http://somewhere/default.aspx "
)



ie.radioButtonSet(
"
login
"
,
"
rbtnInnoble
"
,
1
)



ie.textBoxSet(
"
tbUsername
"
,user);



ie.textBoxSet(
"
tbPassword
"
,user);



ie.buttonClick(
"
btnLogin
"
)



assert
(ie.locationURL()
==
" http://somewhere/Vote.aspx "
)



#
投5次票



for
i
in
range(
5
):



if
(ie.locationURL()
!=
" http://somewhere/ShowUser.aspx?UserID=%c2%f3%d7%d3 "
):



ie.navigate(
" http://somewhere/ShowUser.aspx?UserID=%c2%f3%d7%d3 "
)



ie.buttonImageClick(
"
ImageButton1
"
)



#
投票成功,点击弹出对话框的"确认"按钮.



c
=
cModalPopUp.handlePopup(
"
Alert
"
,
"
确定
"
)



c.start()



time.sleep(
1
)



c.join()



time.sleep(
30
)
#
sleep 30 seconds