如何使用IE Automation技术制作投票机器人？
好处就是没有任何兼容性问题,除非网站不支持用IE浏览:)
#-*-coding:mbcs-*-#说明:使用了cPAMIE模块,#连续投10000次票poll_num=10000importrandomimporttimeimportcPAMIE#处理javascript弹出窗口importcModalPopUpie=cPAMIE.PAMIE()forjinrange(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次票foriinrange(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)#sleep30seconds本文地址：http://www.45fan.com/a/question/67980.html