エコな生活しませんか  
 

   = 地球の温暖化防止震災に備えて =

   地球環境を守るために、自然エネルギーを 有効活用しましょう!

    
  
 ・太陽光発電を設置 しました

    設置して12年、平成21年12月から新買取制度により、元が取れるようになりました)

    ・太陽熱温水器を 設置しました
   (設置して25年、新しい温水器に取り替えしました

    雨水タンク(500g・トイレ専用)を設置し ました
    (設置して11年、トイレ流水に活用しています。震災が来ても水洗トイレ使用出来ます

    雨水を上手に活用、タンク(600g)を南側に も増設しました
    (植木の水やり・洗車・外回りの清掃に活用しています)

      ・生ゴミ処理機を活用して みませんか

      屋根付きバイクを活用しています
     購入して13年、走行距離2万キロ達成。雨の日でも活用しています。

        今年も緑のカーテンを設置しました

        ・関連ホームページへ

       ☆  2010/  7/ 30 更新 ☆
 

アクセスカウンター

  <% Set objFS = Server.CreateObject("Scripting.FileSystemObject") Set objTS = objFS.OpenTextFile(Server.MapPath("d:/homepage/index.htm/ctr.txt"),1) num = ObjTS.ReadLine objTS.close num = num + 1 Set objTS = objFS.OpenTextFile(Server.MapPath("d:/homepage/index.htm/ctr.txt"),2) objTS.Write(num) objTS.close Set objTS = objFS.OpenTextFile(Server.MapPath("d:/homepage/index.htm/log.htm"),8,true) objTS.Write(date()):objTS.Write(","):objTS.Write(time()):objTS.Write(",") objTS.Write(request("remote_host")):objTS.Write(","):objTS.Write(request("http_user_agent")) objTS.Write(","):objTS.Write(num):objTS.WriteLine("
"):objTS.close %>