使用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