アットウィキロゴ

リンク作成映画

function myFunction() {
 
  sx=0;
 
   var link=new Array();
 
 
  for(tr=1;tr<600;tr++){  
 
uu="http://mimorin2014.blog.fc2.com/category6-"+tr+".html";
 
 
    str="";
      try {
 
 var response = UrlFetchApp.fetch(uu);
 str=response.getContentText();
 
    } 
    catch (e) {Logger.log("Fail")}
 
 
 
 
 
 var x=str.split("\n");
 
 
 for(s=1;s<x.length;s++){ 
 if(x[s].indexOf("続きを読む</a>")>-1)sx=sx+1;
 if(x[s].indexOf("続きを読む</a>")>-1)link[sx]=x[s];  
}
 
}    
 
 
 
  number=sx;
 
  de="http://mimorin2014.blog.fc2.com/blog-entry-"
 
  for(s=1;s<number+1;s++){
  p1=link[s].indexOf(de);
  p2=link[s].indexOf("html",p1);
  link[s]=link[s].substring(p1,p2)+"html";  
  Logger.log(link[s]);
  }
 
 
  var vs=new Array();
  for(s=0;s<number+1;s++){
  vs[s]=new Array();
  } 
 
 
  vs[0][0]="link";
  for(s=1;s<number+1;s++){
  vs[s][0]=link[s];
  } 
 
   var id="1KOkYsVvl0TrzPnG9tQ_e2ivQuhH93_b2cKSC1tJ7w7U";
 
 
 
 
 
 var ex = SpreadsheetApp.openById(id);
 
    var sheet = ex.getSheetByName("data");  
 
 
    sheet.getRange(1,1,number+1,1).setValues(vs);
 
 
 
 
 
 
 
 
 
 
 
 
}
 
最終更新:2017年04月21日 17:50