みかや - 経済統計練習帳

function myFunction() {
 
  uu="http://www.tbs.co.jp/cdtv/guest/gl_161022.html";
 
   str="";
      try {
 
 var res = UrlFetchApp.fetch(uu);
        str=res.getContentText();
 
    } catch (e) { Logger.log("Fail");}
 
 
 
 
 
 var x=str.split("\n");
 
 var c=new Array();
 
 sx=0;
 for(s=1;s<x.length;s++){
if(x[s].indexOf(">アーティスト名：<")>-1)sx=sx+1;
if(x[s].indexOf(">アーティスト名：<")>-1)c[sx]=clean_str(x[s]);
 }
 
  var id="1zaVZjK_ONzq1LT-1zKPNhrYw3WEjrp7AYQO-JDFp_Fk";
 
 var ex = SpreadsheetApp.openById(id);
 
 var sh = ex.getSheetByName("data"); 
 
 for(s=1;s<sx+1;s++){
 sh.getRange(s,1).setValue(c[s]);
 }
 
 
 
 
 
 
 
 
}
 
function clean_str(str){
 
  sp=str;
  for(kk=1;kk<15;kk++){
  sp=fresh(sp);
  }
  return sp;
}
 
function fresh(strstr){
 
  strstr=""+strstr;
 
  p1=strstr.indexOf("<")
  p2=-1; 
  if(p1>-1)p2=strstr.indexOf(">",p1)
  k="";
  if(p2>-1)k=strstr.substring(p1,p2)+">";
 
  strxp=strstr.replace(k,"");
 
  return strxp;
 
}