Chinaunix首页 | 论坛 | 博客
  • 博客访问: 846444
  • 博文数量: 180
  • 博客积分: 10029
  • 博客等级: 上将
  • 技术积分: 2185
  • 用 户 组: 普通用户
  • 注册时间: 2009-11-06 09:15
文章存档

2010年(133)

2009年(47)

我的朋友

分类: 系统运维

2010-07-30 23:06:37

require "watir" 
require 
'hpricot'  
require 
'open-uri'  

ie 
= Watir::IE.new 

def get_ids_and_names(url)   
  doc 
= Hpricot(url)   
  names 
= []   
  ids 
= []   
  doc.search(
"strong/a").each do |a|   
     ids 
<< $1 if a.to_s.match(/id=(\d+)/  
     names 
<< Hpricot(a.to_s).search("a").inner_html.strip   
  end  
  
return ids,names   
end  



username 
= "用户名"
userpass 
= "密码"

ie.goto 
 

ie.text_field(:name, 
"email").clear
ie.text_field(:name, 
"email").set("#{username}")
ie.text_field(:name, 
"password").set("#{userpass}")

ie.button(:id, 
"login").click


 
0.upto(10do |p|   
    query 
= "%E5%AE%81%E5%A4%8F"  #把关键字在谷歌上转换下就好了
    url 
= http://browse.renren.com/os.do?curpage=#{p}&k=&q=#{query}&n=-1  
    ie.goto(url)   
    sleep(
5  
    i
=0   
    
10.times do  
       begin  
         @ids,@names 
= get_ids_and_names(ie.html)   
         ie.link(:id,
"addFriend#{@ids[i]}").click   
         sleep(
3  
         ie.text_field(:id,
"addFriendMessage").set("hi," + @names[i])   
         sleep(
3  
         ie.button(:index
=>1).click
         sleep(
3  
         
+= 1   
       rescue  
          next  
       end  
     end  
  end  
阅读(2022) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~