じむｔｙｙｔ - 経済統計練習帳

function myFunction() {
 
  uu="http://www.tvdrama-db.com/frame_list/p/waku-NHK_Mon-Sat_0815%2CNHK_Mon-Sat_0730=pageindex-1"
 
 
 
      str="";
      try {
 
 var response = UrlFetchApp.fetch(uu);
 str=response.getContentText("UTF-8");
 
    } 
    catch (e) {Logger.log("Fail")}
 
  var x=str.split("\n");
 
  var link=new Array();
  var name=new Array();
 
  sx=0;
  for(s=0;s<x.length;s++){
  if(x[s].indexOf("/drama_info/p/")>-1)sx=sx+1;
    if(x[s].indexOf("/drama_info/p/")>-1)link[sx]=x[s]; 
  }
 
  number=sx;
 
 
 
 
   for(s=1;s<number+1;s++){ 
 
     p1=link[s].indexOf(">");
     p2=link[s].indexOf("</a>",p1);
 name[s]=link[s].substring(p1+1,p2); 
   }
 
 
 
  for(s=1;s<number+1;s++){ 
 p1=link[s].indexOf("/drama_info/p/");
     p2=link[s].indexOf("\"",p1);
 link[s]=link[s].substring(p1,p2);
}
 
id="1W7k7uI4_f2R20vca4hAjIahzKc8Db9thMTNKCIRV-kA";
 
ex = SpreadsheetApp.openById(id);
 
    sh = ex.getSheetByName("data");
 
for(s=1;s<number+1;s++){  
sh.getRange(s,1).setValue(name[s]);
sh.getRange(s,2).setValue(link[s]);
}
 
 
 
 
 
 
}