アットウィキロゴ
経済統計練習帳
アットウィキロゴ
経済統計練習帳
ページ一覧

00+8 

<!DOCTYPE html>
<html>
<head>
</head>
<body onload="sample()">
<select id='sel'>
</select>
<p id="memo">click</p>
<?!= HtmlService.createHtmlOutputFromFile('sample').getContent(); ?>
</body>
</html>
 
 
<script src="//ajax.googleapis.com/ajax/libs/jquery/1.9.1/jquery.min.js"></script>
<script>
 
var x=new Array();
var n;
 
function sample(){
 
 
 
 
google.script.run
       .withSuccessHandler(function(link) {
 
 
           for(s=1;s<1896;s++){
            $("#sel").append("<option value='"+link[s][2]+"'>"+link[s][1]+"</option>");
           }
 
          })
       .withFailureHandler(function(msg) {})
       .dic()
 
 
 
  $("#sel").change(function () {
 
        w=$("#sel").val();
 
paint(w);    
 
 
    });
 
 
 }
 
 
  function paint(w){
 
 
      google.script.run
       .withSuccessHandler(function(x) {
 
           str="<h1>"+x[0]+"</h1>";
 
           for(s=1;s<x.length;s++){
           str=str+"<h2>"+x[s]+"</h2>";
           }
 
           $("#memo").html(str);
          })
       .withFailureHandler(function(msg) {})
       .play(w)
 
 
     }
 
 
</script>
 
var link=new Array();
 
function doGet(e) {
 
 
  var template = HtmlService.createTemplateFromFile('index');
 
 
  return template.evaluate()
      .setTitle('本')
      .setSandboxMode(HtmlService.SandboxMode.IFRAME);
}
 
function dic(){
 
var id="11W9uRJYTYRHzVpCFWm0ARTHEhnfvMFavpVk6eQrJDDA";
 
  ex = SpreadsheetApp.openById(id);
 
  var sh = ex.getSheetByName("web");
 
var v=sh.getRange(1, 1,1896,3).getValues();
 
for(s=1;s<1896;s++){
link[s]=new Array();
}
 
for(s=1;s<1896;s++){
link[s][2]=v[s][2];
link[s][1]=v[s][0]+"("+v[s][1]+")";
}
 
return link;
 
}
 
 
function play(w){
 
 
 
 
   urlx=w;
 
 
 Logger.log(w);
 
      str="";
      try {
 
 var res = UrlFetchApp.fetch(urlx);
        str=res.getContentText("SJIS");
 
    } catch (e) { Logger.log("Fail");}
 
 
for(s=1;s<400;s++){
str=str.replace("<BR>","〇");
}
 
str=clean_str(str);
 
var x=str.split("〇");
 
return x;
 
 
}
 
 
 
function clean_str(str){
 
  sp=str;
  for(kk=1;kk<250;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;
 
}
 
「00+8」をウィキ内検索
最終更新：2017年08月15日 02:06