⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 calender.asp

📁 功能非常强大的一款办公自动化软件原代码,其中的文档签收功能特别实用.不相信下下来看下.
💻 ASP
📖 第 1 页 / 共 2 页
字号:
         if(s.length>0) { //农历节日
            if(s.length>6) s = s.substr(0, 4)+'…';
            s = s.fontcolor('red');
         }
         else { //国历节日
            s=cld[sD].solarFestival;
            if(s.length>0) {
               size = (s.charCodeAt(0)>0 && s.charCodeAt(0)<128)?8:4;
               if(s.length>size+2) s = s.substr(0, size)+'…';
               s = s.fontcolor('blue');
            }
            else { //廿四节气
               s=cld[sD].solarTerms;
               if(s.length>0) s = s.fontcolor('limegreen');
            }
         }
         if(s.length>0) lObj.innerHTML = s;

      }
      else { //非日期
         sObj.innerHTML = '';
         lObj.innerHTML = '';
      }
   }
}


function changeCld() {
   var y,m;
   y=CLD.SY.selectedIndex+1900;
   m=CLD.SM.selectedIndex;
   drawCld(y,m);
}

function pushBtm(K) {
   switch (K){
      case 'YU' :
         if(CLD.SY.selectedIndex>0) CLD.SY.selectedIndex--;
         break;
      case 'YD' :
         if(CLD.SY.selectedIndex<149) CLD.SY.selectedIndex++;
         break;
      case 'MU' :
         if(CLD.SM.selectedIndex>0) {
            CLD.SM.selectedIndex--;
         }
         else {
            CLD.SM.selectedIndex=11;
            if(CLD.SY.selectedIndex>0) CLD.SY.selectedIndex--;
         }
         break;
      case 'MD' :
         if(CLD.SM.selectedIndex<11) {
            CLD.SM.selectedIndex++;
         }
         else {
            CLD.SM.selectedIndex=0;
            if(CLD.SY.selectedIndex<149) CLD.SY.selectedIndex++;
         }
         break;
      default :
         CLD.SY.selectedIndex=tY-1900;
         CLD.SM.selectedIndex=tM;
   }
   changeCld();
}

var Today = new Date();
var tY = Today.getFullYear();
var tM = Today.getMonth();
var tD = Today.getDate();
//////////////////////////////////////////////////////////////////////////////

var width = "130";
var offsetx = 2;
var offsety = 16;

var x = 0;
var y = 0;
var snow = 0;
var sw = 0;
var cnt = 0;

var dStyle;
document.onmousemove = mEvn;

//显示详细日期资料
function mOvr(v) {
   var s,festival;
   var sObj=eval('SD'+ v);
   var d=sObj.innerHTML-1;
	//var cursor s-resize

      //sYear,sMonth,sDay,week,
      //lYear,lMonth,lDay,isLeap,
      //cYear,cMonth,cDay

   if(sObj.innerHTML!='') {

      sObj.style.cursor ='help';
      if(cld[d].solarTerms == '' && cld[d].solarFestival == '' && cld[d].lunarFestival == '')
         festival = '';
      else
         festival = '<TABLE WIDTH=100% BORDER=0 CELLPADDING=2 CELLSPACING=0 BGCOLOR="#CCFFCC"><TR><TD>'+
         '<FONT COLOR="#000000" STYLE="font-size:9pt;">'+cld[d].solarTerms + ' ' + cld[d].solarFestival + ' ' + cld[d].lunarFestival+'</FONT></TD>'+
         '</TR></TABLE>';

      s= '<TABLE WIDTH="130" BORDER=0 CELLPADDING="2" CELLSPACING=0 BGCOLOR="#000066"><TR><TD>' +
         '<TABLE WIDTH=100% BORDER=0 CELLPADDING=0 CELLSPACING=0><TR><TD ALIGN="right"><FONT COLOR="#ffffff" STYLE="font-size:9pt;">'+
         cld[d].sYear+' 年 '+cld[d].sMonth+' 月 '+cld[d].sDay+' 日<br>星期'+cld[d].week+'<br>'+
         '<font color="violet">农历'+(cld[d].isLeap?'闰 ':' ')+cld[d].lMonth+' 月 '+cld[d].lDay+' 日</font><br>'+
         '<font color="yellow">'+cld[d].cYear+'年 '+cld[d].cMonth+'月 '+cld[d].cDay + '日</font>'+
         '</FONT></TD></TR></TABLE>'+ festival +'</TD></TR></TABLE>';


      document.all["detail"].innerHTML = s;

   	if (snow == 0) {
         dStyle.left = x+offsetx-(width/2);
         dStyle.top = y+offsety;
   		dStyle.visibility = "visible";
   		snow = 1;
   	}
	}
}

//清除详细日期资料
function mOut() {
	if ( cnt >= 1 ) { sw = 0 }
	if ( sw == 0 ) { snow = 0;	dStyle.visibility = "hidden";}
	else cnt++;
}

//取得位置
function mEvn() {
   x=event.x;
   y=event.y;
	if (document.body.scrollLeft)
	   {x=event.x+document.body.scrollLeft; y=event.y+document.body.scrollTop;}
	if (snow){
      dStyle.left = x+offsetx-(width/2)
      dStyle.top = y+offsety
	}
}

///////////////////////////////////////////////////////////////////////////

function changeTZ() {
   CITY.innerHTML = CLD.TZ.value.substr(6)
   setCookie("TZ",CLD.TZ.selectedIndex)
}


function tick() {
   var today
   today = new Date()
   Clock.innerHTML = today.toLocaleString()
   Clock2.innerHTML = TimeAdd(today.toGMTString(), CLD.TZ.value)
   window.setTimeout("tick()", 1000);
}

function setCookie(name, value) {
	var today = new Date()
	var expires = new Date()
	expires.setTime(today.getTime() + 1000*60*60*24*365)
	document.cookie = name + "=" + escape(value)	+ "; expires=" + expires.toGMTString()
}

function getCookie(Name) {
   var search = Name + "="
   if(document.cookie.length > 0) {
      offset = document.cookie.indexOf(search)
      if(offset != -1) {
         offset += search.length
         end = document.cookie.indexOf(";", offset)
         if(end == -1) end = document.cookie.length
         return unescape(document.cookie.substring(offset, end))
      }
      else return ""
   }
}

/////////////////////////////////////////////////////////

function initial() {
     dStyle = detail.style;
   CLD.SY.selectedIndex=tY-1900;
   CLD.SM.selectedIndex=tM;
   drawCld(tY,tM);
   pushBtm('');
   CLD.TZ.selectedIndex=getCookie("TZ");
   changeTZ();
   tick();
if (tM + 1==10 && tD<4) {alert('今天是国庆假期! 祝您国庆节快乐!')}
if (tM + 1==1 && tD<2) {alert('过节啦!! 今天是元旦!  祝您新年快乐!')}
}
//-->
</SCRIPT>

<SCRIPT language=VBScript>
<!--
'===== 算世界时间
Function TimeAdd(UTC,T)
   Dim PlusMinus, DST, y,tSave
   If Left(T,1)="-" Then PlusMinus = -1 Else PlusMinus = 1
   UTC=Right(UTC,Len(UTC)-5)
   UTC=Left(UTC,Len(UTC)-4)
   y = Year(UTC)
   TimeAdd=DateAdd("n", (Cint(Mid(T,2,2))*60 + Cint(Mid(T,4,2))) * PlusMinus, UTC)
   '美国日光节约期间: 4月第一个星日00:00 至 10月最後一个星期日00:00
   If Mid(T,6,1)="*" And DateSerial(y,4,(9 - Weekday(DateSerial(y,4,1)) mod 7) ) <= TimeAdd And DateSerial(y,10,31 - Weekday(DateSerial(y,10,31))) >= TimeAdd Then
      TimeAdd=CStr(DateAdd("h", 1, TimeAdd)) & "<FONT STYLE='font-size:18pt;font-family:Wingdings; color:red'>R</FONT>"
   Else
   End If
   TimeAdd = CStr(TimeAdd)
End Function
'-->
</SCRIPT>

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

<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY leftMargin=0 topMargin=0 onload=initial() bgcolor="#EFFFFF">
<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 vAlign=top align=middle><BR>
          <FONT style="FONT-SIZE: 9pt" 
      size=2>本机时间:</FONT><BR>
          <FONT id=Clock face=Arial color=#000080 size=4 
      align="center"></FONT> 
          <P>
            <!--时区 *表示自动调整为日光节约时间-->
            <FONT style="FONT-SIZE: 9pt" size=2>
            <SELECT 
      style="FONT-SIZE: 9pt" onchange=changeTZ() name=TZ>
              <OPTION 
        value="-1200 安尼威土克、瓜甲兰" selected>国际换日线
              <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 
      id=Clock2 face=Arial color=#000080 size=4 align="center"></FONT><BR>
            <FONT 
      style="FONT-SIZE: 120pt; COLOR: green; FONT-FAMILY: Webdings">&ucirc;</FONT><BR>
            <FONT 
      id=CITY 
      style="FONT-SIZE: 9pt; WIDTH: 150px; COLOR: blue; FONT-FAMILY: '新细明体'"></FONT></P>
          <P align=middle vAlign="top"><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#ffffff')">白</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#ffefef')">红</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#ffffef')">黄</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#efffff')">蓝</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#efffef')">绿</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#e4defe')">紫</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#e4efff')">浅</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#a6d8f1')">蓝</BUTTON><BUTTON style="FONT-SIZE: 9pt" 
      onclick="r('#669933')">青</BUTTON> </P>
        </TD>
        <TD align=middle rowspan="2"> 
          <DIV style="Z-INDEX: -1; POSITION: absolute; TOP: 50px"><FONT id=YMBG 
      style="FONT-SIZE: 80pt; COLOR: #f0f0f0; FONT-FAMILY: 'Arial Black'">&nbsp;0000<BR>
            &nbsp;JUN</FONT> </DIV>
          <TABLE border=0>
            <TBODY> 
            <TR> 
              <TD bgColor=#000080 colSpan=7><FONT style="FONT-SIZE: 9pt" 
            color=#ffffff size=2>公历
                <SELECT style="FONT-SIZE: 9pt" 
            onchange=changeCld() name=SY>
                  <SCRIPT language=JavaScript>
            for(i=1900;i<2050;i++) document.write('<option>'+i)
           </SCRIPT>
                </SELECT>
                <SELECT style="FONT-SIZE: 9pt" onchange=changeCld() 
            name=SM>
                  <SCRIPT language=JavaScript>
            for(i=1;i<13;i++) document.write('<option>'+i)
           </SCRIPT>
                </SELECT>
                月 </FONT><FONT id=GZ face=标楷体 color=yellow 
            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>
            var gNum
            for(i=0;i<6;i++) {
               document.write('<tr align=center>')
               for(j=0;j<7;j++) {
                  gNum = i*7+j
                  document.write('<td id="GD' + gNum +'" onMouseOver="mOvr(' + gNum +')" onMouseOut="mOut()"><font id="SD' + gNum +'" size=5 face="Arial Black"')
                  if(j == 0) document.write(' color=red')
                  if(j == 6)
                     if(i%2==1) document.write(' color=red')
                        else document.write(' color=green')
                  document.write(' TITLE=""> </font><br><font id="LD' + gNum + '" size=2 style="font-size:9pt"> </font></td>')
               }
               document.write('</tr>')
            }
            </SCRIPT>
            </TBODY>
          </TABLE>
        </TD>
        <TD vAlign=top align=middle width=40 rowspan="2"><BR>
          <BR>
          <BR>
          <BR>
          <BUTTON 
      style="FONT-SIZE: 9pt" onclick="pushBtm('YU')">年↑</BUTTON><BR>
          <BUTTON 
      style="FONT-SIZE: 9pt" onclick="pushBtm('YD')">年↓</BUTTON> 
          <P><BUTTON style="FONT-SIZE: 9pt" 
      onclick="pushBtm('MU')">月↑</BUTTON><BR>
            <BUTTON style="FONT-SIZE: 9pt" 
      onclick="pushBtm('MD')">月↓</BUTTON> 
          <P><BUTTON style="FONT-SIZE: 9pt" onclick="pushBtm('')">今日</BUTTON> 
          </P>
        </TD>
      </TR>
      
      </TBODY>
    </TABLE>
  </FORM>
<P></P>
<HR width="90%" color=green noShade SIZE=1>
  <FONT style="FONT-SIZE: 9pt" face=ARIAL size=2>阳历中<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>
  </font></font>
</CENTER></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -