首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > Web前端 >

计算大暑

2012-08-10 
计算三伏天div classright_s_inputtable aligncentertbodytrtd width120 alignright

计算三伏天
<div class="right_s_input"><table align="center"> <tbody> <tr> <td width="120" align="right">请输入公历年份:</td> <td> <input name="year" type="text" id="year" size="10" maxlength="4"> <input type="submit" name="Submit" value="三伏天计算" onclick="check();"> <input name="b" type="reset" id="b" onclick="checks();" value="清除重填"> </td> </tr> <tr> <td align="right">初伏庚日:</td> <td><input name="date1" type="text" id="date1" size="16" readonly=""></td> </tr> <tr> <td align="right">中伏庚日:</td> <td><input name="date2" type="text" id="date2" size="16" readonly=""></td> </tr> <tr> <td align="right">中伏/ 天:</td> <td><input name="date3" type="text" id="date3" size="16" readonly=""></td> </tr> <tr> <td align="right">末伏庚日:</td> <td><input name="date4" type="text" id="date4" size="16" readonly=""></td> </tr> <tr> <td align="right">出伏日期:</td> <td><input name="date5" type="text" size="16" id="date5" readonly=""></td> </tr> </tbody></table><script>function checks(){ document.getElementById("year").value="";document.getElementById("date1").value="";document.getElementById("date2").value="";document.getElementById("date3").value="";document.getElementById("date3").className="";document.getElementById("date4").value="";document.getElementById("date5").value="";}function check(){ var date1=0,date2=0,date3=0,date4=0,date5=0,date6=0; var objvalue=document.getElementById("year").value; objvalue=parseInt(objvalue); if(objvalue<2100 && objvalue>1999) { //取后2位objvalue=objvalue-2000;//objvalue2尾数objvalue2=objvalue;//大于80减80if(objvalue>80) objvalue=objvalue-80;//大于40减40if(objvalue>40) objvalue=objvalue-40;//除以4结果取整数objvalue=parseInt(objvalue/4);//后2位为奇数,加5.if(objvalue2%2==1) objvalue=objvalue+5;//求庚日num=11-objvalue;if(num>1) date6=10;else date6=20;//初伏庚日date1=date6+num;//中伏庚日date2=date1+10;//求中伏天数if(date1>18){ date3=10; classname="green"; }else{ date3=20; classname="red"; } //末伏庚日date4=date2+date3-31; //出伏日期 date5=date4+10; document.getElementById("date1").value="7月"+date1+"日";document.getElementById("date2").value="7月"+date2+"日";document.getElementById("date3").value=date3;document.getElementById("date3").className=classname;document.getElementById("date4").value="8月"+date4+"日";document.getElementById("date5").value="8月"+date5+"日"; } else alert("本工具计算2000年-2099年计100年范围各年度夏三伏的入伏日期!");}</script></div>

热点排行