﻿//==================================================== 参数设定部分 =======================================================
var bMoveable=true;		//设置日历是否可以拖动
//==================================================== WEB 页面显示部分 =====================================================
var strFrame;		//存放日历层的HTML代码
//document.writeln('<iframe id=meizzDateLayer Author=wayx frameborder=0 style="position: absolute; width: 144; height: 211; z-index: 9998; display: none"></iframe>');
document.writeln("<iframe id=\"DateLayer\" frameborder=\"0\" style=\"DISPLAY: none; Z-INDEX: 114; LEFT: 21px; WIDTH: 144px; POSITION: absolute; TOP: 30px; HEIGHT: 155px\"></iframe>");
strFrame='<style>';
strFrame+='INPUT.button{BORDER-RIGHT: #ff9900 1px solid;BORDER-TOP: #ff9900 1px solid;BORDER-LEFT: #ff9900 1px solid;';
strFrame+='BORDER-BOTTOM: #ff9900 1px solid;BACKGROUND-COLOR: #fff8ec;font-family:宋体;}';
strFrame+='TD{FONT-SIZE: 9pt;font-family:宋体;}';
strFrame+='</style>';/////
strFrame+='<div style="z-index:9999;position: absolute; left:0; top:0;" onselectstart="return false"><span id=tmpSelectYearLayer style="z-index: 9999;position: absolute;top: 3; left: 19;display: none"></span>';
strFrame+='<span id=tmpSelectMonthLayer style="z-index: 9999;position: absolute;top: 3; left: 78;display: none"></span>';
strFrame+='<table border=1 cellspacing=0 cellpadding=0 width=121 height=155 bordercolor=#ff9900 bgcolor=#ff9900>';
strFrame+='  <tr><td width=121 height=20 bgcolor=#FFFFFF><table border=0 cellspacing=1 cellpadding=0 width=140 height=20>';
strFrame+='      <tr align=center><td width=16 align=center bgcolor=#ff9900 style="font-size:12px;cursor: hand;color: #ffffff" ';
strFrame+='        onclick="parent.PrevM()" title="向前翻 1 月"><b>&lt;</b>';
strFrame+='        </td><td width=55 align=center style="font-size:12px;cursor:default" ';
strFrame+='onmouseover="style.backgroundColor=\'#FFD700\'" onmouseout="style.backgroundColor=\'white\'" ';
strFrame+='onclick="parent.tmpSelectYearInnerHTML(this.innerText.substring(0,4))" title="点击这里选择年份"><span id=YearHead></span></td>';
strFrame+='<td width=42 align=center style="font-size:12px;cursor:default" onmouseover="style.backgroundColor=\'#FFD700\'" ';
strFrame+=' onmouseout="style.backgroundColor=\'white\'" onclick="parent.tmpSelectMonthInnerHTML(this.innerText.length==3?this.innerText.substring(0,1):this.innerText.substring(0,2))"';
strFrame+='        title="点击这里选择月份"><span id=MonthHead></span></td>';
strFrame+='        <td width=16 bgcolor=#ff9900 align=center style="font-size:12px;cursor: hand;color: #ffffff" ';
strFrame+='         onclick="parent.NextM()" title="向后翻 1 月"><b>&gt;</b></td></tr>';
strFrame+='    </table></td></tr>';
strFrame+='  <tr><td width=140 height=17>';
strFrame+='<table border=0 cellspacing=0 cellpadding=0 bgcolor=#ff9900 ' + (bMoveable? '':'');
strFrame+=' BORDERCOLORLIGHT="" BORDERCOLORDARK="" width=140 height=17 style="cursor:' + (bMoveable ? 'move':'default') + '">';
strFrame+='<tr align=center valign=bottom><td style="font-size:12px;color:#FFFFFF">日</td>';
strFrame+='<td style="font-size:12px;color:#FFFFFF">一</td><td style="font-size:12px;color:#FFFFFF">二</td>';
strFrame+='<td style="font-size:12px;color:#FFFFFF">三</td><td style="font-size:12px;color:#FFFFFF">四</td>';
strFrame+='<td style="font-size:12px;color:#FFFFFF">五</td><td style="font-size:12px;color:#FFFFFF">六</td></tr>';
strFrame+='</table></td></tr>';
strFrame+='  <tr><td width=121 height=107 valign=top>';
strFrame+='    <table border=1 cellspacing=0 cellpadding=0 BORDERCOLORLIGHT=#FF9900 BORDERCOLORDARK=#FFFFFF bgcolor=#fff8ec width=140 height=107>';
var n=0; for (j=0;j<5;j++){ strFrame+= ' <tr align=center>'; for (i=0;i<7;i++){
strFrame+='<td width=16 height=16 id=Day'+n+' style="font-size:12px" onclick=parent.DayClick(this.innerText,0)></td>';n++;}
strFrame+='</tr>';}
strFrame+='      <tr align=center>';
for (i=35;i<39;i++)strFrame+='<td width=16 height=16 id=Day'+i+' style="font-size:12px" onclick="parent.DayClick(this.innerText,0)"></td>';
strFrame+='        <td colspan=3 align=right><span onclick=parent.closeLayer() style="font-size:12px;cursor: hand"';
strFrame+='         ><u>关闭</u></span>&nbsp;</td></tr>';
strFrame+='    </table></td></tr></table></div>';

window.frames.DateLayer.document.writeln(strFrame);
window.frames.DateLayer.document.close();		//解决ie进度条不结束的问题
//document.all.DateLayer.innerHtml = strFrame;

//==================================================== WEB 页面显示部分 ======================================================
var outObject;
var outButton;		//点击的按钮
var outDate="";		//存放对象的日期
var odatelayer=window.frames.DateLayer.document.all;	//存放日历对象document.all.DateLayer;	
function SetDate(tt,obj) //主调函数
{
    var ButtonTop=parseFloat(tt.style.top.toString().replace("px",""));
   // alert(ButtonTop)
   // alert(document.body.clientHeight)

    var tmpW=tt.clientWidth;
	if (arguments.length >  2){alert("对不起！传入本控件的参数太多！");return;}
	if (arguments.length == 0){alert("对不起！您没有传回本控件任何参数！");return;}
	var dads  = document.all.DateLayer.style;
	var th = tt;
	var ttop  = tt.offsetTop;     //TT控件的定位点高
	var thei  = tt.clientHeight;  //TT控件本身的高
	var tleft = tt.offsetLeft;    //TT控件的定位点宽
	var ttyp  = tt.type;          //TT控件的类型
	while (tt = tt.offsetParent){ttop+=tt.offsetTop; tleft+=tt.offsetLeft;}
	dads.top  = (ttyp=="image")? ttop+thei : ttop+thei+2;
	//0405
	var diff=ButtonTop+25+155-document.body.clientHeight;
	 var newtop=parseFloat(dads.top.toString().replace("px",""));
	if(diff>0)
	    dads.top=newtop-diff;
	//else
    //	 dads.top=ButtonTop+26;
 
	dads.left = tleft+tmpW-144;
	outObject = (arguments.length == 1) ? th : obj;
	outButton = (arguments.length == 1) ? null : th;	//设定外部点击的按钮
	//根据当前输入框的日期显示日历的年月
	var reg = /^(\d+)-(\d{1,2})-(\d{1,2})$/; 
	var r = outObject.value.match(reg); 
	if(r!=null){
		r[2]=r[2]-1; 
		var d= new Date(r[1], r[2],r[3]); 
		if(d.getFullYear()==r[1] && d.getMonth()==r[2] && d.getDate()==r[3]){
			outDate=d;		//保存外部传入的日期
		}
		else outDate="";
			SetDay(r[1],r[2]+1);
	}
	else{
		outDate="";
		SetDay(new Date().getFullYear(), new Date().getMonth() + 1);
	}
	dads.display = '';

	event.returnValue=false;
}

var MonHead = new Array(12);    		   //定义阳历中每个月的最大天数
    MonHead[0] = 31; MonHead[1] = 28; MonHead[2] = 31; MonHead[3] = 30; MonHead[4]  = 31; MonHead[5]  = 30;
    MonHead[6] = 31; MonHead[7] = 31; MonHead[8] = 30; MonHead[9] = 31; MonHead[10] = 30; MonHead[11] = 31;

var TheYear=new Date().getFullYear(); //定义年的变量的初始值
var TheMonth=new Date().getMonth()+1; //定义月的变量的初始值
var WDay=new Array(39);               //定义写日期的数组

function document.onclick() { //任意点击时关闭该控件	//ie6的情况可以由下面的切换焦点处理代替
	with(window.event) { 
		if (srcElement != outObject && srcElement != outButton)
		closeLayer();
	}
}

function document.onkeyup()	{ //按Esc键关闭，切换焦点关闭
	if (window.event.keyCode==27) {
		if(outObject)outObject.blur();
			closeLayer();
	}
	else if(document.activeElement) {
		if(document.activeElement != outObject && document.activeElement != outButton)
			closeLayer();
	}
}

function WriteHead(yy,mm) { //往 head 中写入当前的年与月
	odatelayer.YearHead.innerText  = yy + " 年";
	odatelayer.MonthHead.innerText = mm + " 月";
}

function tmpSelectYearInnerHTML(strYear) { //年份的下拉框
  if (strYear.match(/\D/)!=null){alert("年份输入参数不是数字！");return;}
  var m = (strYear) ? strYear : new Date().getFullYear();
  if (m < 1000 || m > 9999) {alert("年份值不在 1000 到 9999 之间！");return;}
  var n = m - 10;
  if (n < 1000) n = 1000;
  if (n + 26 > 9999) n = 9974;
  var s = "<select name=tmpSelectYear style='font-size: 12px' "
     s += "onblur='document.all.tmpSelectYearLayer.style.display=\"none\"' "
     s += "onchange='document.all.tmpSelectYearLayer.style.display=\"none\";"
     s += "parent.TheYear = this.value; parent.SetDay(parent.TheYear,parent.TheMonth)'>\r\n";
  var selectInnerHTML = s;
  for (var i = n; i < n + 26; i++)
  {
    if (i == m)
       {selectInnerHTML += "<option value='" + i + "' selected>" + i + "年" + "</option>\r\n";}
    else {selectInnerHTML += "<option value='" + i + "'>" + i + "年" + "</option>\r\n";}
  }
  selectInnerHTML += "</select>";
  odatelayer.tmpSelectYearLayer.style.display="";
  odatelayer.tmpSelectYearLayer.innerHTML = selectInnerHTML;
  odatelayer.tmpSelectYear.focus();
}

function tmpSelectMonthInnerHTML(strMonth) { //月份的下拉框
	if (strMonth.match(/\D/)!=null){alert("月份输入参数不是数字！");return;}
	var m = (strMonth) ? strMonth : new Date().getMonth() + 1;
	var s = "<select name=tmpSelectMonth style='font-size: 12px' "
		s += "onblur='document.all.tmpSelectMonthLayer.style.display=\"none\"' "
		s += "onchange='document.all.tmpSelectMonthLayer.style.display=\"none\";"
		s += "parent.TheMonth = this.value; parent.SetDay(parent.TheYear,parent.TheMonth)'>\r\n";
	var selectInnerHTML = s;
	for (var i = 1; i < 13; i++) {
		if (i == m) {selectInnerHTML += "<option value='"+i+"' selected>"+i+"月"+"</option>\r\n";}
		else {selectInnerHTML += "<option value='"+i+"'>"+i+"月"+"</option>\r\n";}
	}
	selectInnerHTML += "</select>";
	odatelayer.tmpSelectMonthLayer.style.display="";
	odatelayer.tmpSelectMonthLayer.innerHTML = selectInnerHTML;
	odatelayer.tmpSelectMonth.focus();
}

function closeLayer() { //这个层的关闭
	document.all.DateLayer.style.display="none";
}
function IsPinYear(year) { //判断是否闰平年
	if (0==year%4&&((year%100!=0)||(year%400==0))) return true;else return false;
}
function GetMonthCount(year,month) { //闰年二月为29天
	var c=MonHead[month-1];if((month==2)&&IsPinYear(year)) c++;return c;
}
function GetDOW(day,month,year) { //求某天的星期几
	var dt=new Date(year,month-1,day).getDay()/7; return dt;
}
function PrevY() { //往前翻 Year
	if(TheYear > 999 && TheYear <10000){TheYear--;}
	else{alert("年份超出范围（1000-9999）！");}
	SetDay(TheYear,TheMonth);
}
function NextY() { //往后翻 Year
	if(TheYear > 999 && TheYear <10000){TheYear++;}
	else{alert("年份超出范围（1000-9999）！");}
	SetDay(TheYear,TheMonth);
}
function Today() { //Today Button
	var today;
	TheYear = new Date().getFullYear();
	TheMonth = new Date().getMonth()+1;
	today=new Date().getDate();
	//SetDay(TheYear,TheMonth);
	if(outObject){
		outObject.value=TheYear + "-" + TheMonth + "-" + today;
	}
	closeLayer();
}
function PrevM() { //往前翻月份
	if(TheMonth>1){TheMonth--}else{TheYear--;TheMonth=12;}
	SetDay(TheYear,TheMonth);
}
function NextM() { //往后翻月份
	if(TheMonth==12){TheYear++;TheMonth=1}else{TheMonth++}
	SetDay(TheYear,TheMonth);
}

function SetDay(yy,mm) { //主要的写程序**********
  WriteHead(yy,mm);
  //设置当前年月的公共变量为传入值
  TheYear=yy;
  TheMonth=mm;
  
  for (var i = 0; i < 39; i++){WDay[i]=""};  //将显示框的内容全部清空
  var day1 = 1,day2=1,firstday = new Date(yy,mm-1,1).getDay();  //某月第一天的星期几
  for (i=0;i<firstday;i++)WDay[i]=GetMonthCount(mm==1?yy-1:yy,mm==1?12:mm-1)-firstday+i+1	//上个月的最后几天
  for (i = firstday; day1 < GetMonthCount(yy,mm)+1; i++){WDay[i]=day1;day1++;}
  for (i=firstday+GetMonthCount(yy,mm);i<39;i++){WDay[i]=day2;day2++}
  for (i = 0; i < 39; i++)
  { var da = eval("odatelayer.Day"+i)     //书写新的一个月的日期星期排列
    if (WDay[i]!="")
      { 
		//初始化边框
		da.borderColorLight="#FF9900";
		da.borderColorDark="#FFFFFF";
		if(i<firstday)		//上个月的部分
		{
			da.innerHTML="<b><font color=gray>" + WDay[i] + "</font></b>";
			da.title=(mm==1?12:mm-1) +"月" + WDay[i] + "日";
			da.onclick=Function("DayClick(this.innerText,-1)");
			if(!outDate)
				da.style.backgroundColor = ((mm==1?yy-1:yy) == new Date().getFullYear() && 
					(mm==1?12:mm-1) == new Date().getMonth()+1 && WDay[i] == new Date().getDate()) ?
					 "#FFD700":"#e0e0e0";
			else
			{
				da.style.backgroundColor =((mm==1?yy-1:yy)==outDate.getFullYear() && (mm==1?12:mm-1)== outDate.getMonth() + 1 && 
				WDay[i]==outDate.getDate())? "#00ffff" :
				(((mm==1?yy-1:yy) == new Date().getFullYear() && (mm==1?12:mm-1) == new Date().getMonth()+1 && 
				WDay[i] == new Date().getDate()) ? "#FFD700":"#e0e0e0");
				//将选中的日期显示为凹下去
				if((mm==1?yy-1:yy)==outDate.getFullYear() && (mm==1?12:mm-1)== outDate.getMonth() + 1 && 
				WDay[i]==outDate.getDate())
				{
					da.borderColorLight="#FFFFFF";
					da.borderColorDark="#FF9900";
				}
			}
		}
		else if (i>=firstday+GetMonthCount(yy,mm))		//下个月的部分
		{
			da.innerHTML="<b><font color=gray>" + WDay[i] + "</font></b>";
			da.title=(mm==12?1:mm+1) +"月" + WDay[i] + "日";
			da.onclick=Function("DayClick(this.innerText,1)");
			if(!outDate)
				da.style.backgroundColor = ((mm==12?yy+1:yy) == new Date().getFullYear() && 
					(mm==12?1:mm+1) == new Date().getMonth()+1 && WDay[i] == new Date().getDate()) ?
					 "#FFD700":"#e0e0e0";
			else
			{
				da.style.backgroundColor =((mm==12?yy+1:yy)==outDate.getFullYear() && (mm==12?1:mm+1)== outDate.getMonth() + 1 && 
				WDay[i]==outDate.getDate())? "#00ffff" :
				(((mm==12?yy+1:yy) == new Date().getFullYear() && (mm==12?1:mm+1) == new Date().getMonth()+1 && 
				WDay[i] == new Date().getDate()) ? "#FFD700":"#e0e0e0");
				//将选中的日期显示为凹下去
				if((mm==12?yy+1:yy)==outDate.getFullYear() && (mm==12?1:mm+1)== outDate.getMonth() + 1 && 
				WDay[i]==outDate.getDate())
				{
					da.borderColorLight="#FFFFFF";
					da.borderColorDark="#FF9900";
				}
			}
		}
		else		//本月的部分
		{
			da.innerHTML="<b>" + WDay[i] + "</b>";
			da.title=mm +"月" + WDay[i] + "日";
			da.onclick=Function("DayClick(this.innerText,0)");		//给td赋予onclick事件的处理
			//如果是当前选择的日期，则显示亮蓝色的背景；如果是当前日期，则显示暗黄色背景
			if(!outDate)
				da.style.backgroundColor = (yy == new Date().getFullYear() && mm == new Date().getMonth()+1 && WDay[i] == new Date().getDate())?
					"#FFD700":"#e0e0e0";
			else
			{
				da.style.backgroundColor =(yy==outDate.getFullYear() && mm== outDate.getMonth() + 1 && WDay[i]==outDate.getDate())?
					"#00ffff":((yy == new Date().getFullYear() && mm == new Date().getMonth()+1 && WDay[i] == new Date().getDate())?
					"#FFD700":"#e0e0e0");
				//将选中的日期显示为凹下去
				if(yy==outDate.getFullYear() && mm== outDate.getMonth() + 1 && WDay[i]==outDate.getDate())
				{
					da.borderColorLight="#FFFFFF";
					da.borderColorDark="#FF9900";
				}
			}
		}
        da.style.cursor="hand"
      }
    else{da.innerHTML="";da.style.backgroundColor="";da.style.cursor="default"}
  }
}

function DayClick(n,ex) { //点击显示框选取日期，主输入函数*************
	var yy=TheYear;
	var mm = parseInt(TheMonth)+ex;	// ex表示偏移量，用于选择上个月份和下个月份的日期
	// 判断月份，并进行对应的处理
	if(mm<1){ yy--; mm=12+mm; }
	else if(mm>12) { yy++; mm=mm-12; }
	
	//if (mm < 10){mm = "0" + mm;}
	if (outObject) {
		if (!n) return;
		outObject.value= yy + "-" + mm + "-" + n ; // 注：在这里你可以输出改成你想要的格式
		closeLayer(); 
	}
	else {
		closeLayer(); //alert("您所要输出的控件对象并不存在！");
	}
		
}

function isDate(str){
	var today=new Date()
	var month=today.getMonth()+1
	var day=today.getDate()
	var t=str;
	var str=str.value;
	if(str==""||str==null){return}
	str=str.replace("/0","/");
	str=str.replace("/0","/");
	str=str.replace("-0","-");
	str=str.replace("-0","-");
	var reg= /^(\d{1,4})(-|\/)(\d{1,2})\2(\d{1,2})$/; 
	var r = str.match(reg); 
	if(r==null){alert("请输入正确的日期类型格式!");t.focus();t.value=today.getYear()+"-"+month+"-"+day;return false}; 
	var d= new Date(r[1], r[3]-1,r[4]); 
	var newStr=d.getFullYear()+r[2]+(d.getMonth()+1)+r[2]+d.getDate();
	if(newStr!=str){alert("请输入正确的日期类型格式!");t.focus();t.value=today.getYear()+"-"+month+"-"+day;return;}
}
