谁有农历的万年历，asp的源码。 - ASP技术论坛

riig

等　级：论坛游侠
帖　子：36
专家分：107
注　册：2008-5-10

第 2 楼

得分:0

http://site.baidu.com/list/wannianli.htm
有这种代码更好，左边可以不要（国际换日线）

2008-05-10 17:37

hxfly

等　级：贵宾
威　望：17
帖　子：5807
专家分：108
注　册：2005-4-7

第 4 楼

得分:0

<HTML><HEAD><TITLE>万年历查询</TITLE>
<META
content="农历; 阳历; 月历; 节日; 时区; 节气; 八字; 干支; 生肖; gregorian solar; chinese lunar; calendar;"
name=keywords>
<META content=All name=robots>
<META content="gregorian solar calendar and chinese lunar calendar"
name=description>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>

<SCRIPT language=JavaScript>

</SCRIPT>

<SCRIPT language=VBScript>

</SCRIPT>

<STYLE>.todyaColor {
    BACKGROUND-COLOR: aqua
}
</STYLE>

<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY leftMargin=0 onload=initial() topMargin=0>
<SCRIPT language=JavaScript>

</SCRIPT>

<SCRIPT language=JavaScript>

lck=0;
function r(hval)
{
if ( lck == 0 )
{
document.bgColor=hval;
}
}
</SCRIPT>

<DIV id=detail style="POSITION: absolute"></DIV>
<CENTER>
<FORM name=CLD>
<TABLE>
  <TBODY>
  <TR>
    <TD align=middle vAlign=top><BR><FONT size=2
      style="FONT-SIZE: 9pt">本机时间:</FONT><BR><FONT color=#000080 face=Arial
      id=Clock size=4 align="center"> </FONT>
      <P><FONT size=2 style="FONT-SIZE: 9pt"><SELECT
      name=TZ onchange=changeTZ() style="FONT-SIZE: 9pt"> <OPTION selected
        value="-1200 安尼威土克、瓜甲兰">国际换日线<OPTION value="-1100 中途岛、萨摩亚群岛">萨摩亚<OPTION
        value="-1000 夏威夷">夏威夷<OPTION value=-0900*阿拉斯加>阿拉斯加<OPTION
        value=-0800*太平洋时间(美加)、提亚纳>太平洋<OPTION value=-0700*亚历桑那>美国山区<OPTION
        value=-0700*山区时间(美加)>美加山区<OPTION value=-0600*萨克其万(加拿大)>加拿大中部<OPTION
        value=-0600*墨西哥市、塔克西卡帕>墨西哥<OPTION value=-0600*中部时间(美加)>美加中部<OPTION
        value=-0500*波哥大、里玛>南美洲太平洋<OPTION value=-0500*东部时间(美加)>美加东部<OPTION
        value=-0500*印第安纳(东部)>美东<OPTION value=-0400*加拉卡斯、拉帕兹>南美洲西部<OPTION
        value="-0400*大西洋时间加拿大)">大西洋<OPTION value="-0330 新岛(加拿大东岸)">纽芬兰<OPTION
        value="-0300 波西尼亚">东南美洲<OPTION value="-0300 布鲁诺斯爱丽斯、乔治城">南美洲东部<OPTION
        value=-0200*大西洋中部>大西洋中部<OPTION value=-0100*亚速尔群岛、维德角群岛>亚速尔<OPTION
        value="+0000 格林威治时间、都柏林、爱丁堡、伦敦">英国夏令<OPTION
        value="+0000 莫洛维亚(赖比瑞亚)、卡萨布兰卡">格林威治标准<OPTION
        value="+0100 巴黎、马德里">罗马<OPTION value="+0100 布拉格, 华沙, 布达佩斯">中欧<OPTION
        value="+0100 柏林、斯德哥尔摩、罗马、伯恩、布鲁赛尔、维也纳">西欧<OPTION
        value="+0200 以色列">以色列<OPTION value=+0200*东欧>东欧<OPTION
        value=+0200*开罗>埃及<OPTION value=+0200*雅典、赫尔辛基、伊斯坦堡>GFT<OPTION
        value=+0200*赫拉雷、皮托里>南非<OPTION
        value=+0300*巴格达、科威特、奈洛比(肯亚)、里雅德(沙乌地)>沙乌地阿拉伯<OPTION
        value=+0300*莫斯科、圣彼得堡、贺占、窝瓦格瑞德>俄罗斯<OPTION value=+0330*德黑兰>伊朗<OPTION
        value=+0400*阿布达比(东阿拉伯)、莫斯凯、塔布理斯(乔治亚共和)>阿拉伯<OPTION
        value=+0430*喀布尔>阿富汗<OPTION value="+0500 伊斯兰马巴德、克洛奇、伊卡特林堡、塔须肯">西亚<OPTION
        value="+0530 孟买、加尔各答、马垂斯、新德里、可伦坡">印度<OPTION
        value="+0600 阿马提、达卡">中亚<OPTION value="+0700 曼谷、亚加达、胡志明市">曼谷<OPTION
        value="+0800 北京、重庆、黑龙江">中国<OPTION value="+0800 台湾、香港、新加坡">台北<OPTION
        value="+0900 东京、大阪、扎幌、汉城、亚库兹(东西伯利亚)">东京<OPTION
        value="+0930 达尔文">澳洲中部<OPTION value="+1000 布里斯本、墨尔本、席德尼">席德尼<OPTION
        value="+1000 霍巴特">塔斯梅尼亚<OPTION value="+1000 关岛、莫斯比港、海  威">西太平洋<OPTION
        value=+1100*马哥大、所罗门群岛、新卡伦多尼亚>太平洋中部<OPTION
        value="+1200 威灵顿、奥克兰">纽西兰<OPTION
      value="+1200 斐济、肯加塔、马歇尔群岛">斐济</OPTION></SELECT>时间 </FONT><BR><FONT
      color=#000080 face=Arial id=Clock2 size=4 align="center"></FONT><BR><FONT
      style="COLOR: green; FONT-FAMILY: Webdings; FONT-SIZE: 120pt">û</FONT><BR><FONT
      id=CITY
      style="COLOR: blue; FONT-FAMILY: '新细明体'; FONT-SIZE: 9pt; WIDTH: 150px"></FONT></P>
      <P align=middle vAlign="top"><BUTTON onclick="r('#ffffff')"
      style="FONT-SIZE: 9pt">白</BUTTON><BUTTON onclick="r('#ffefef')"
      style="FONT-SIZE: 9pt">红</BUTTON><BUTTON onclick="r('#ffffef')"
      style="FONT-SIZE: 9pt">黄</BUTTON><BUTTON onclick="r('#efffff')"
      style="FONT-SIZE: 9pt">蓝</BUTTON><BUTTON onclick="r('#efffef')"
      style="FONT-SIZE: 9pt">绿</BUTTON><BUTTON onclick="r('#e4defe')"
      style="FONT-SIZE: 9pt">紫</BUTTON><BUTTON onclick="r('#e4efff')"
      style="FONT-SIZE: 9pt">浅</BUTTON><BUTTON onclick="r('#a6d8f1')"
      style="FONT-SIZE: 9pt">蓝</BUTTON><BUTTON onclick="r('#669933')"
      style="FONT-SIZE: 9pt">青</BUTTON> </P></TD>
    <TD align=middle>
      <DIV style="POSITION: absolute; TOP: 30px; Z-INDEX: -1"><FONT id=YMBG
      style="COLOR: #f0f0f0; FONT-FAMILY: 'Arial Black'; FONT-SIZE: 90pt"> 0000<BR> JUN</FONT>
      </DIV>
      <TABLE border=0>
        <TBODY>
        <TR>
          <TD bgColor=#000080 colSpan=7><FONT color=#ffffff size=2
            style="FONT-SIZE: 9pt">公历<SELECT name=SY onchange=changeCld()
            style="FONT-SIZE: 9pt">
              <SCRIPT language=JavaScript></SCRIPT>
            </SELECT>年<SELECT name=SM onchange=changeCld()
            style="FONT-SIZE: 9pt">
              <SCRIPT language=JavaScript></SCRIPT>
            </SELECT>月 </FONT><FONT color=yellow face=标楷体 id=GZ
            size=3> </FONT><BR></TD></TR>
        <TR align=middle bgColor=#e0e0e0>
          <TD width=54><FONT color=red>日</FONT></TD>
          <TD width=54>一</TD>
          <TD width=54>二</TD>
          <TD width=54>三</TD>
          <TD width=54>四</TD>
          <TD width=54>五</TD>
          <TD width=54><FONT color=green>六</FONT></TD></TR>
        <SCRIPT language=JavaScript></SCRIPT>
        </TBODY></TABLE></TD>
    <TD align=middle vAlign=top width=40><BR><BR><BR><BR><BUTTON
      onclick="pushBtm('YU')" style="FONT-SIZE: 9pt">年↑</BUTTON><BR><BUTTON
      onclick="pushBtm('YD')" style="FONT-SIZE: 9pt">年↓</BUTTON>
      <P><BUTTON onclick="pushBtm('MU')"
      style="FONT-SIZE: 9pt">月↑</BUTTON><BR><BUTTON onclick="pushBtm('MD')"
      style="FONT-SIZE: 9pt">月↓</BUTTON>
      <P><BUTTON onclick="pushBtm('')" style="FONT-SIZE: 9pt">今日</BUTTON>
  </P></TD></TR></TBODY></TABLE></FORM>
<P></P>
<HR color=green noShade SIZE=1 width="90%">
<FONT face=ARIAL size=2 style="FONT-SIZE: 9pt">阳历中<FONT
color=red>红色</FONT>/<FONT color=green>绿色</FONT><FONT color=black>表示节假日，农历中<FONT
color=green>绿色</FONT>表示为24节气日，<FONT color=red>红色</FONT>表示为传统节日，<FONT
color=blue>蓝色</FONT>则表示为公众节假日<BR></CENTER></FONT></FONT><p align="center"><span class="font"><font size="2">万年历版权所有
2004--2008 <br>
</font>
</span>
</p>
</BODY></HTML>

2008-05-10 17:48