衛星雲圖程式更新--修改2 @ 簡睿IT隨筆(搬到http://jdev.tw了)

2006-04-29 10:50 衛星雲圖程式更新--修改2

中央氣象局的氣象資訊更新到第5版，導致原先的衛星雲圖都無法顯示，因此做了下列修改，使能正確讀到需要的衛星雲圖圖檔。
請注意下列程式的＜script>等HTML標籤的小於符號要由全形改成半形。

2006/05/01：修正零時會抓錯圖檔的檔名的錯誤。

＜script>
var type = "1";
var url = "";
function menu() {
   if (type == "1")   type = "3";
else if (type == "3")   type = "0";
else   type = "1";
  map(type);
}

function map(type) {
var d = new Date();
var da = d.getDate();
   if (da<10) da = '0'+da;
  var m = d.getMonth()+1;
if (m<10) m = '0'+m;
var h = d.getHours()-1;
if (h>21) h=21;
if (h<=0) h = '00'; // 2006/05/01 修改錯誤
else if (h<10) h = '0'+h;
var y = d.getYear(); if (y < 2000) y += 1900;
url = "http://www.cwb.gov.tw/V5/observe/satellite/Data/s"+type+"p/s"+type+
"p-"+ h+'-'+da+'-'+m+'-'+ y + ".jpg";
  document.getElementById('SPAN1').innerHTML = "＜img src="+url+" width='190px' height='190px' " +
   " oncontextmenu='menu();return false;'/>";
}
＜/script>

＜a href='http://www.cwb.gov.tw/V5/observe/satellite/sat.htm' target='_blank'    title='按左鈕連氣象局雲圖網站；按右鈕換圖'>
＜span id='SPAN1'> ＜/span>＜/a>
＜script> map(type);＜/script>

平均分數：0 顆星投票人數：0 人
我要評分：

jerry@xuite / Xuite日誌 / 回應(8) / 引用(0) / 好文轉寄

將Big5的內容轉出成日文...|日誌首頁|微軟新字體：正黑體