dl asa - 経済統計練習帳

function myFunction() {
 
  for(m=7;m<13;m++){  
 
    mm=""+m;
    if(m<10)mm="0"+m;
 
 uu="http://www.tv-asahi.co.jp/hst/poll/2016"+mm+"/index.html";
 
 
     str="";
      try {
 
 var res = UrlFetchApp.fetch(uu);
        str=res.getContentText();
 
    } catch (e) { Logger.log("Fail");}
 
 
 
 
p1=str.indexOf(">支持する</dt>");
p2=str.indexOf("</dl>",p1);
 
str=str.substring(p1,p2);
 
     Logger.log(str);
 
var x=str.split("</dd>");
 
  var id3="1PF8sc4Dtm1td5tFhqhbNrJZoVOPWa24OwpxouY4E5nk";
var ex3 = SpreadsheetApp.openById(id3);
var sh3 = ex3.getSheetByName("data");  
 
 
for(s=0;s<x.length;s++){
delta=clean_str(x[s]);
delta=delta.replace(">支持する","");
  delta=delta.replace("支持しない","");
delta=delta.trim();
  p1=delta.indexOf("%");
  delta=delta.substring(0,p1);
  sh3.getRange(s+1,m).setValue(delta);
}
 
  } 
 
 
}
 
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;
 
}