開心日歷

cleaneyes

浏览: 343589 次
性别:
来自: 深圳

最近访客更多访客>>

张中文

u012363178

amo

muyuan

博主相关

博客

微博

相册

留言

关于我

文章分类

社区版块

存档分类

VBScript JavaScript J#生活 Microsoft

}

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

var cld;

function drawCld(SY,SM) {
var i,sD,s,size;
cld = new calendar(SY,SM);

   if(SY>1874 && SY<1909) yDisplay = '光绪' + (((SY-1874)==1)?'元':SY-1874)
   if(SY>1908 && SY<1912) yDisplay = '宣统' + (((SY-1908)==1)?'元':SY-1908)
   if(SY>1911 && SY<1950) yDisplay = '民国' + (((SY-1911)==1)?'元':SY-1911)
   if(SY>1949) yDisplay = '' + (((SY-1949)==1)?'元':SY)

GZ.innerHTML = yDisplay +'年农历' + cyclical(SY-1900+36) + '年   【'+Animals[(SY-4)%12]+'】';

YMBG.innerHTML = " " + SY + "<BR> " + monthName[SM];

for(i=0;i<42;i++) {

sObj=eval('SD'+ i);
lObj=eval('LD'+ i);

sObj.className = '';

sD = i - cld.firstWeek;

if(sD>-1 && sD<cld.length) { //日期内
sObj.innerHTML = sD+1;

if(cld[sD].isToday) sObj.className = 'todyaColor'; //今日颜色

sObj.style.color = cld[sD].color; //国定假日颜色

         if(cld[sD].lDay==1) //显示农历月
            lObj.innerHTML = '<b>'+(cld[sD].isLeap?'闰':'') + cld[sD].lMonth + '月' + (monthDays(cld[sD].lYear,cld[sD].lMonth)==29?'小':'大')+'</b>';
         else //显示农历日
            lObj.innerHTML = cDay(cld[sD].lDay);

         s=cld[sD].lunarFestival;
         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);
}

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;

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

if(sObj.innerHTML!='') {

sObj.style.cursor = 's-resize';

      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().replace(/(年|月)/g, "/").replace(/日/, "");
   Clock.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);

   CLD.TZ.selectedIndex=getCookie("TZ");
   changeTZ();
   tick();
   play_rt();
}

//-->
</SCRIPT>

<SCRIPT language=VBScript>

</SCRIPT>

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

<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY leftMargin=0 topMargin=0 onload=initial()>
<SCRIPT LANGUAGE="JavaScript">
var tempStr = "天天好心情！"
var today01 = new Date();
var month01 = today01.getMonth()
var date01 = today01.getDate()
if (month01 == 11 && date01 == 25){
tempStr = "�}�Q快��!" + "\n" + tempStr
}
if (month01 == 0 && date01 == 1){
tempStr = "新年快��!"+ "\n" + tempStr
}
if (month01 == 9 && date01 == 11){
tempStr = "宗�G，生日快��!"+ "\n" + tempStr
}
if (month01 == 11 && date01 == 20){
tempStr = "澳门回归纪念日快��!"+ "\n" + tempStr
}

n = new Array();
n[0]= "病人:我失眠.医生:这些药丸,红色让你梦到德华; 白色梦到阿伦;绿色梦到润发.病人;那我全部服下去呢?医生:那你可以见到国荣. "
n[1]="一大学生被敌人抓了,敌人把他绑在了电线杆上,然后问他:说,你是哪里的？不说就电死你!大学生回了敌人一句话,结果被电死了,他说:我是电大的! "
n[2] = "急�D��：小明一直在吹��L扇，�槭颤N��M�^大�h？"
n[3] = "考��r，小明已��知道考��答案了，�槭颤N�s不做答？"
n[4] = "两只狗赛跑甲狗跑得快，乙狗跑得慢，跑到终点时，哪只狗出汗多? "
n[5] = " 为什么有家医院从不给人看病？ "
n[6] = ":小王是一名优秀士兵，一天他在站岗值勤时，明明看到有敌人悄悄向他摸过来，为什么他却睁一只眼闭一只眼？ "
n[7] = "有一个人，他是你父母生的，但他却不是你的兄弟姐妹，他是谁？ "
n[8] = " 哪儿的海不产鱼? "
n[9] = "有种动物，大小像只猫，长相又像虎，这是什么动物? "
n[10] = "小明对小华说：“我可以坐在一个你永远也坐不到的地方！”他坐在哪里? "
n[11] = " 有一个人一年才上一天班又不怕被解雇他是谁? "
n[12] = " 为什么现代人越来越言而无信? "
n[13] = "三个孩子吃三个饼要用3分钟，九十个孩子九十个饼要用多少时间? "
n[14] = " 中国人最早的姓氏是什么? "
n[15] = "小明家住在五楼，可是电梯坏了，他自己也没有走楼梯，他却上了五楼回到家里，这可能吗? "
n[16] = "一只凶猛的饿猫，看到老鼠，为何拔腿就跑？ "
n[17] = "两对父子去买帽子，为什么只买了三顶？ "
n[18] = "报纸上登的消息不一定百分之百是真的，但什么消息绝对假不了？"
n[19] = "一架飞机坐满了人，从万米高空落下坠毁，为什么却一个伤者也没有？"
n[20] = "什么东西人们都不喜欢吃? "
n[21] = " 小刘是个很普通的人，为什么竟然能一连十几个小时不眨眼? "
n[22] = "小王走路从来脚不沾地，这是为什么? "
n[23] = "你能否用3跟筷子搭起一个比3大比4小的数？ "
n[24] = " 一个人在什么情况下，才处于真正的任人宰割的地步？ "
n[25] = "什么东西越洗越脏？ "
n[26] = "有一个字，人人见了都会念错。这是什么字？ "
n[27] = "象棋与围棋的区别是什么？ "
n[28] = "铁锤锤鸡蛋为什么锤不破？"
j=0;

m = new Array()
m[0] = "生活每天都是新的！"
m[1] = "�_心日�v 祝你"
m[2] = "^ _ ^ "+tempStr
m[3]= n[0]

var i=0;

function play_rt()
{
rt1.style.filter="revealTrans(Duration=1.5,Transition=12)";
rt1.filters.revealTrans.apply(); //改变前一定要这一句！
rt1.innerHTML=m[i++]; //改变内容！
if(i>3){i=0} //如果显示到第六条信息就从头开始!
if (j++>n.length) j=0;
m[3] = n[j];
rt1.filters.revealTrans.play(); //播放效果了
timer = setTimeout("play_rt()",6000) //3秒后执行"play_rt()"函数
}
</SCRIPT>
<TABLE BORDER="0" width="100%" height=36>
<tr><td width="50%">  </td>
<td width="50%" align="center" height=36>
<TABLE BORDER="0" >
<TR>
<TD HEIGHT="18" id="rt1" align="left"> </TD>
</TR>
</TABLE>
</td>
</tr>
</TABLE>