ASP中的日期控件

sundl · 发表于 2008-1-18 15:47:27

马上注册，结交更多郧西好友

您需要登录才可以下载或查看，没有帐号？注册

x

<SCRIPT language=javascript>
IsTime=false; //减小了日历尺寸，修改了时间显示（20040528）。
//为了避免不显示当前日期，需在textbox添加默认日期和时间，
var bMoveable=true; //设置日历是否可以拖动
//var IsTime = false; //设置是否插入时间
//==================================================== WEB 页面显示部分 =====================================================
var strFrame; //存放日历层的HTML代码
documentwriteln('<iframe bgcolor="#000000" id=meizzDateLayer Author=wayx frameborder=0 style="position: absolute; width: 186; height: 247; z-index: 9999; display: none"></iframe>');
strFrame='<style>';
strFrame+='INPUT{BORDER-RIGHT: #B3C9E1 1px solid;BORDER-TOP: #B3C9E1 1px solid;BORDER-LEFT: #B3C9E1 1px solid;';
strFrame+='BORDER-BOTTOM: #ff9900 1px solid;BACKGROUND-COLOR: #EDF2F8;font-family:宋体;height: 18px;}';
strFrame+='TD{FONT-SIZE: 12px;font-family:宋体;}';
strFrame+='</style>';
strFrame+='<scr' + 'ipt>';
strFrame+='var datelayerx,datelayery;  /*存放日历控件的鼠标位置*/';
strFrame+='var bDrag;  /*标记是否开始拖动*/';
strFrame+='function documentonmousemove()  /*在鼠标移动事件中，如果开始拖动日历，则移动日历*/';
strFrame+='{if(bDrag && windoweventbutton==1)';
strFrame+='  {var DateLayer=parentdocumentallmeizzDateLayerstyle;';
strFrame+=' DateLayerposLeft += windoweventclientX-datelayerx;/*由于每次移动以后鼠标位置都恢复为初始的位置，因此写法与div中不同*/';
strFrame+=' DateLayerposTop += windoweventclientY-datelayery;}}';
strFrame+='function DragStart() /*开始日历拖动*/';
strFrame+='{var DateLayer=parentdocumentallmeizzDateLayerstyle;';
strFrame+='  datelayerx=windoweventclientX;';
strFrame+='  datelayery=windoweventclientY;';
strFrame+='  bDrag=true;}';
strFrame+='function DragEnd(){ /*结束日历拖动*/';
strFrame+='  bDrag=false;}';
strFrame+='</scr' + 'ipt>';
strFrame+='<div style="z-index:9999;position: absolute; left:0; top:0;" onselectstart="return false"><span id=tmpSelectYearLayer Author=wayx style="z-index: 9999;position: absolute;top: 3; left: 19;display: none"></span>';
strFrame+='<span id=tmpSelectMonthLayer Author=wayx style="z-index: 9999;position: absolute;top: 3; left: 78;display: none"></span>';
strFrame+='<table style="FILTER:dropshadow(color=#EDEDF8,offx=33,offy=33,positive=1);" cellSpacing="0" cellPadding="0" width="100%" border="0"><tr><td>';
// 控件边框颜色
strFrame+='<table border=1 cellspacing=0 cellpadding=0 width=108 height=160 bgColor="#FFFFFF" borderColorLight="#7197CA" borderColorDark="#ffffff" Author="wayx">';
strFrame+=' <tr Author="wayx"><td Author="wayx" bgcolor=#FFFFFF><table border=0 cellspacing=1 cellpadding=0 Author="wayx">';
strFrame+=' <tr align=center Author="wayx"><td width=16 align=center bgcolor=#B6CAE4 style="font-size:12px;cursor: hand;color: #ffffff" ';
strFrame+=' onclick="parentmeizzPrevM()" title="向前翻 1 月" Author=meizz><b Author=meizz><</b>';
strFrame+=' </td><td width=60 align=center style="font-size:12px;cursor:default" Author=meizz ';
strFrame+='onmouseover="stylebackgroundColor=\'#D7E1F0\'" onmouseout="stylebackgroundColor=\'white\'" ';
strFrame+='onclick="parenttmpSelectYearInnerHTML(thisinnerTextsubstring(0,4))" title="点击这里选择年份"><span Author=meizz id=meizzYearHead></span></td>';
strFrame+='<td width=48 align=center style="font-size:12px;cursor:default" Author=meizz onmouseover="stylebackgroundColor=\'#D7E1F0\'" ';
strFrame+=' onmouseout="stylebackgroundColor=\'white\'" onclick="parenttmpSelectMonthInnerHTML(thisinnerTextlength==3?thisinnerTextsubstring(0,1):thisinnerTextsubstring(0,2))"';
strFrame+=' title="点击这里选择月份"><span id=meizzMonthHead Author=meizz></span></td>';
strFrame+=' <td width=16 bgcolor=#B6CAE4 align=center style="font-size:12px;cursor: hand;color: #ffffff" ';
strFrame+='    onclick="parentmeizzNextM()" title="向后翻 1 月" Author=meizz><b Author=meizz>></b></td></tr>';
strFrame+='  </table></td></tr>';
strFrame+=' <tr Author="wayx"><td width=180 height=18 Author="wayx">';
strFrame+='<table border=1 cellspacing=0 cellpadding=3 bgcolor=#618BC5 ' + (bMoveable? 'onmousedown="DragStart()" onmouseup="DragEnd()"':'');
strFrame+=' BORDERCOLORLIGHT=#3677b1 bgcolor=#5168C8 BORDERCOLORDARK=#FFFFFF width="100%" Author="wayx" style="cursor:' + (bMoveable ? 'move':'default') + '" height=20>';
strFrame+='<tr Author="wayx" valign="middle" align="center"><td style="font-size:12px;color:#FF6699" Author=meizz><b>日</b></td>';
strFrame+='<td style="font-size:12px;color:#FFFFFF" Author=meizz><b>一</b></td><td style="font-size:12px;color:#FFFFFF" Author=meizz><b>二</b></td>';
strFrame+='<td style="font-size:12px;color:#FFFFFF" Author=meizz><b>三</b></td><td style="font-size:12px;color:#FFFFFF" Author=meizz><b>四</b></td>';
strFrame+='<td style="font-size:12px;color:#FFFFFF"  Author=meizz><b>五</b></td><td style="font-size:12px;color:#FF6699" Author=meizz><b>六</b></td></tr>';
strFrame+='</table></td></tr>';
strFrame+=' <tr Author="wayx"><td width="100%" Author="wayx">';
strFrame+='  <table border=1 cellspacing=2 cellpadding=0 borderColorDark=#ffffff bgColor=#FFFFFF borderColorLight=#83A4D1 width="100%" Author="wayx">';
//设置日期的位置。
var n=0; for (j=0;j<5;j++){ strFrame+= ' <tr align=center Author="wayx">'; for (i=0;i<7;i++){
strFrame+='<td id=meizzDay'+n+' style="font-size:12px" Author=meizz onclick=parentmeizzDayClick(thisinnerText,0)></td>';n++;}
strFrame+='</tr>';}
strFrame+=' <tr align=center Author="wayx">';
for (i=35;i<39;i++)strFrame+='<td id=meizzDay'+i+' style="font-size:12px" Author=wayx onclick="parentmeizzDayClick(thisinnerText,0)"></td>';
strFrame+=' <td colspan=3 align=right Author=meizz><span onclick=parentcloseLayer() style="font-size:12px;cursor: hand"';
strFrame+='    Author=INFOHOLDgg=v12><u>关闭</u></span> </td></tr>';
strFrame+='  </table></td></tr><tr Author="wayx"><td Author="wayx">';
strFrame+=' <table border=0 cellspacing=1 cellpadding=0 width=100% Author="wayx" bgcolor=#FFFFFF>';
strFrame+='    <tr Author="wayx"><td Author=meizz align=left><input Author=meizz type=button class=button style="cursor:hand" value="<<" title="向前翻 1 年" onclick="parentmeizzPrevY()" ';
strFrame+='    onfocus="thisblur()" style="font-size: 12px; height: 20px"><input Author=meizz class=button title="向前翻 1 月" type=button ';
strFrame+='    value="< " style="cursor:hand" onclick="parentmeizzPrevM()" onfocus="thisblur()" style="font-size: 12px; height: 20px"></td><td ';
strFrame+='    Author=meizz align=center><input Author=meizz style="cursor:hand" type=button class=button value=当前日期 onclick="parentmeizzToday()" ';
strFrame+='    onfocus="thisblur()" title="当前日期" style="font-size: 12px; height: 20px; cursor:hand"></td><td ';
strFrame+='    Author=meizz align=right><input Author=meizz type=button class=button value=" >" style="cursor:hand" onclick="parentmeizzNextM()" ';
strFrame+='    onfocus="thisblur()" title="向后翻 1 月" class=button style="font-size: 12px; height: 20px"><input ';
strFrame+='    Author=meizz type=button class=button style="cursor:hand" value=">>" title="向后翻 1 年" onclick="parentmeizzNextY()"';
strFrame+='    onfocus="thisblur()" style="font-size: 12px; height: 20px"></td>';
strFrame+='</tr></table></td></tr></table></td></tr></table></div>';

windowframesmeizzDateLayerdocumentwriteln(strFrame);
windowframesmeizzDateLayerdocumentclose(); //解决ie进度条不结束的问题

//==================================================== WEB 页面显示部分 ======================================================
var outObject;
var outButton; //点击的按钮
var outDate=""; //存放对象的日期
var odatelayer=windowframesmeizzDateLayerdocumentall; //存放日历对象
function setday(tt,obj) //主调函数
{
  if (argumentslength > 2){alert("对不起！传入本控件的参数太多！");return;}
  if (argumentslength == 0){alert("对不起！您没有传回本控件任何参数！");return;}
  var dads = documentallmeizzDateLayerstyle;
  var th = tt;
  var ttop = ttoffsetTop; //TT控件的定位点高
  var thei = ttclientHeight; //TT控件本身的高
  var tleft = ttoffsetLeft;  //TT控件的定位点宽
  var ttyp = tttype;    //TT控件的类型

  while (tt = ttoffsetParent)
  {
ttop += ttoffsetTop;
tleft += ttoffsetLeft;
  }
dadstop = (ttyp=="image")? ttop+thei : ttop+thei+6;
  dadsleft = tleft;

  outObject = (argumentslength == 1) ? th : obj;
  outButton = (argumentslength == 1) ? null : th;  //设定外部点击的按钮
  //根据当前输入框的日期显示日历的年月
  var reg = /^(\d+)-(\d{1,2})-(\d{1,2})$/;
  if(IsTime){
  var reg = /^(\d+)-(\d{1,2})-(\d{1,2}) (\d{1,2})

\d{1,2})

\d{1,2})$/
  }
  var r = outObjectvaluematch(reg);
  if(r!=null){
r[2]=r[2]-1;
var d= new Date(r[1], r[2],r[3]);
if(dgetFullYear()==r[1] && dgetMonth()==r[2] && dgetDate()==r[3]){
   outDate=d; //保存外部传入的日期
}
else outDate="";
   meizzSetDay(r[1],r[2]+1);
  }
  else{
outDate="";
meizzSetDay(new Date()getFullYear(), new Date()getMonth() + 1);
  }
  dadsdisplay = '';

  eventreturnValue=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 meizzTheYear=new Date()getFullYear(); //定义年的变量的初始值
var meizzTheMonth=new Date()getMonth()+1; //定义月的变量的初始值
var meizzWDay=new Array(39);       //定义写日期的数组

function documentonclick() //任意点击时关闭该控件  //ie6的情况可以由下面的切换焦点处理代替
{
with(windowevent)
{ if (srcElementgetAttribute("Author")==null && srcElement != outObject && srcElement != outButton)
   closeLayer();
}
}

function documentonkeyup() //按Esc键关闭，切换焦点关闭
{
   if (windoweventkeyCode==27){
      if(outObject)outObjectblur();
      closeLayer();
   }
   else if(documentactiveElement)
      if(documentactiveElementgetAttribute("Author")==null && documentactiveElement != outObject && documentactiveElement != outButton)
      {
      closeLayer();
      }
}

function meizzWriteHead(yy,mm) //往 head 中写入当前的年与月
{
   odatelayermeizzYearHeadinnerText = yy + " 年";
   odatelayermeizzMonthHeadinnerText = mm + " 月";
}

function tmpSelectYearInnerHTML(strYear) //年份的下拉框
{
if (strYearmatch(/\D/)!=null){alert("年份输入参数不是数字！");return;}
var m = (strYear) ? strYear : new Date()getFullYear();
if (m < 1000 || m > 9999) {alert("年份值不在 1000 到 9999 之间！");return;}
var n = m - 80;
if (n < 1000) n = 1000;
if (n + 26 > 9999) n = 9974;
var s = "  <select Author=meizz name=tmpSelectYear style='font-size: 12px' "
   s += "onblur='documentalltmpSelectYearLayerstyledisplay=\"none\"' "
   s += "onchange='documentalltmpSelectYearLayerstyledisplay=\"none\";"
   s += "parentmeizzTheYear = thisvalue; parentmeizzSetDay(parentmeizzTheYear,parentmeizzTheMonth)'>\r\n";
var selectInnerHTML = s;
for (var i = n; i < n + 100; i++)
{
   if (i == m)
   {selectInnerHTML += "<option Author=wayx value='" + i + "' selected>" + i + "年" + "</option>\r\n";}
   else {selectInnerHTML += "<option Author=wayx value='" + i + "'>" + i + "年" + "</option>\r\n";}
}
selectInnerHTML += "</select>";
odatelayertmpSelectYearLayerstyledisplay="";
odatelayertmpSelectYearLayerinnerHTML = selectInnerHTML;
odatelayertmpSelectYearfocus();
}

function tmpSelectMonthInnerHTML(strMonth) //月份的下拉框
{
if (strMonthmatch(/\D/)!=null){alert("月份输入参数不是数字！");return;}
var m = (strMonth) ? strMonth : new Date()getMonth() + 1;
var s = " <select Author=meizz name=tmpSelectMonth style='font-size: 12px' "
   s += "onblur='documentalltmpSelectMonthLayerstyledisplay=\"none\"' "
   s += "onchange='documentalltmpSelectMonthLayerstyledisplay=\"none\";"
   s += "parentmeizzTheMonth = thisvalue; parentmeizzSetDay(parentmeizzTheYear,parentmeizzTheMonth)'>\r\n";
var selectInnerHTML = s;
for (var i = 1; i < 13; i++)
{
   if (i == m)
   {selectInnerHTML += "<option Author=wayx value='"+i+"' selected>"+i+"月"+"</option>\r\n";}
   else {selectInnerHTML += "<option Author=wayx value='"+i+"'>"+i+"月"+"</option>\r\n";}
}
selectInnerHTML += "</select>";
odatelayertmpSelectMonthLayerstyledisplay="";
odatelayertmpSelectMonthLayerinnerHTML = selectInnerHTML;
odatelayertmpSelectMonthfocus();
}

function closeLayer()       //这个层的关闭
{
   documentallmeizzDateLayerstyledisplay="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 meizzPrevY() //往前翻 Year
{
   if(meizzTheYear > 999 && meizzTheYear <10000){meizzTheYear--;}
   else{alert("年份超出范围（1000-9999）！");}
   meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzNextY() //往后翻 Year
{
   if(meizzTheYear > 999 && meizzTheYear <10000){meizzTheYear++;}
   else{alert("年份超出范围（1000-9999）！");}
   meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzToday() //Today Button
{
   var today;
   meizzTheYear = new Date()getFullYear();
   meizzTheMonth = new Date()getMonth()+1;
   today=new Date()getDate();
   //meizzSetDay(meizzTheYear,meizzTheMonth);
   if(outObject){
      outObjectvalue=meizzTheYear + "-" + meizzTheMonth + "-" + today;
   }
   closeLayer();
}
function meizzPrevM() //往前翻月份
{
   if(meizzTheMonth>1){meizzTheMonth--}else{meizzTheYear--;meizzTheMonth=12;}
   meizzSetDay(meizzTheYear,meizzTheMonth);
}
function meizzNextM() //往后翻月份
{
   if(meizzTheMonth==12){meizzTheYear++;meizzTheMonth=1}else{meizzTheMonth++}
   meizzSetDay(meizzTheYear,meizzTheMonth);
}

function meizzSetDay(yy,mm)  //主要的写程序**********
{
meizzWriteHead(yy,mm);
//设置当前年月的公共变量为传入值
meizzTheYear=yy;
meizzTheMonth=mm;

for (var i = 0; i < 39; i++){meizzWDay=""}; //将显示框的内容全部清空
var day1 = 1,day2=1,firstday = new Date(yy,mm-1,1)getDay(); //某月第一天的星期几
for (i=0;i<firstday;i++)meizzWDay=GetMonthCount(mm==1?yy-1:yy,mm==1?12:mm-1)-firstday+i+1  //上个月的最后几天
for (i = firstday; day1 < GetMonthCount(yy,mm)+1; i++){meizzWDay=day1;day1++;}
for (i=firstday+GetMonthCount(yy,mm);i<39;i++){meizzWDay=day2;day2++}
for (i = 0; i < 39; i++)
{ var da = eval("odatelayermeizzDay"+i) //书写新的一个月的日期星期排列
   if (meizzWDay!="")
   {
      //初始化边框
      daborderColorLight="#76A0CF";
      daborderColorDark="#76A0CF";
      if(i<firstday) //上个月的部分
      {
      dainnerHTML="<font style=' color: #B5C5D2;'>" + meizzWDay + "</font>";
      datitle=(mm==1?12:mm-1) +"月" + meizzWDay + "日";
      daonclick=Function("meizzDayClick(thisinnerText,-1)");

      if(!outDate)
         dastylebackgroundColor = ((mm==1?yy-1:yy) == new Date()getFullYear() &&
            (mm==1?12:mm-1) == new Date()getMonth()+1 && meizzWDay == new Date()getDate()) ?
            "#E4E3F2":"#FFFFFF";
      else
      {
         dastylebackgroundColor =((mm==1?yy-1:yy)==outDategetFullYear() && (mm==1?12:mm-1)== outDategetMonth() + 1 &&
         meizzWDay==outDategetDate())? "#E8F5E7" : // 选中日期颜色
         (((mm==1?yy-1:yy) == new Date()getFullYear() && (mm==1?12:mm-1) == new Date()getMonth()+1 &&
         meizzWDay == new Date()getDate()) ? "#E4E3F2":"#FFFFFF"); // 当前系统时间颜色
         //将选中的日期显示为凹下去
         if((mm==1?yy-1:yy)==outDategetFullYear() && (mm==1?12:mm-1)== outDategetMonth() + 1 &&
         meizzWDay==outDategetDate())
         {
            //daborderColorLight="#E4E3F2";
//       daborderColorDark="#E4E3F2"; // 选择日期边框颜色
         }
      }

      }
      else if (i>=firstday+GetMonthCount(yy,mm)) //下个月的部分
      {
      dainnerHTML="<font style=' color: #B5C5D2;'>" + meizzWDay + "</font>";
      datitle=(mm==12?1:mm+1) +"月" + meizzWDay + "日";
      daonclick=Function("meizzDayClick(thisinnerText,1)");
      if(!outDate)
         dastylebackgroundColor = ((mm==12?yy+1:yy) == new Date()getFullYear() &&
            (mm==12?1:mm+1) == new Date()getMonth()+1 && meizzWDay == new Date()getDate()) ?
            "#E4E3F2":"#FFFFFF";
      else
      {
         dastylebackgroundColor =((mm==12?yy+1:yy)==outDategetFullYear() && (mm==12?1:mm+1)== outDategetMonth() + 1 &&
         meizzWDay==outDategetDate())? "#E8F5E7" : // 选中日期颜色
         (((mm==12?yy+1:yy) == new Date()getFullYear() && (mm==12?1:mm+1) == new Date()getMonth()+1 &&
         meizzWDay == new Date()getDate()) ? "#E4E3F2":"#FFFFFF"); // 当前系统时间
         //将选中的日期显示为凹下去
         if((mm==12?yy+1:yy)==outDategetFullYear() && (mm==12?1:mm+1)== outDategetMonth() + 1 &&
         meizzWDay==outDategetDate())
         {
            daborderColorLight="#E4E3F2";
            daborderColorDark="#E4E3F2"; // 选择日期边框颜色
         }
      }
      }
      else //本月的部分
      {
      dainnerHTML="<font style=' color: #3E5468;'>" + meizzWDay + "</FONT>";
      datitle=mm +"月" + meizzWDay + "日";
      daonclick=Function("meizzDayClick(thisinnerText,0)"); //给td赋予onclick事件的处理
      //如果是当前选择的日期，则显示亮蓝色的背景；如果是当前日期，则显示暗黄色背景
      if(!outDate)
         dastylebackgroundColor = (yy == new Date()getFullYear() && mm == new Date()getMonth()+1 && meizzWDay == new Date()getDate())?
            "#FFFFFF":"#FFFFFF";
      else
      {
         dastylebackgroundColor =(yy==outDategetFullYear() && mm== outDategetMonth() + 1 && meizzWDay==outDategetDate())?
            "#D5ECD2"(yy == new Date()getFullYear() && mm == new Date()getMonth()+1 && meizzWDay == new Date()getDate())?
            "#E4E3F2":"#F8F8FC"); // 前一个当前系统时间,后一个是本月时间低色
         //将选中的日期显示为凹下去
         if(yy==outDategetFullYear() && mm== outDategetMonth() + 1 && meizzWDay==outDategetDate())
         {
            //daborderColorLight="#E4E3F2";
            //daborderColorDark="#E4E3F2"; // 选择日期边框颜色
         }
      }
      }
      dastylecursor="hand"
      daonmouseover=Function("thisbackgroundColor='#000000';thisborderColorDark='#000099';thisborderColorLight='#000099';");
      daonmouseout=Function("thisbgColor='#000000';thisborderColorDark='#9CBADE';thisborderColorLight='#9CBADE';");
   }
   else{dainnerHTML="";dastylebackgroundColor="";dastylecursor="default";daonmouseover=Function("thisbackgroundColor='#000000';thisborderColorDark='#000099';thisborderColorLight='#000099';");
      daonmouseout=Function("thisbgColor='#000000';thisborderColorDark='#9CBADE';thisborderColorLight='#9CBADE';");}
}
}

function meizzDayClick(n,ex) //点击显示框选取日期，主输入函数*************
{
var yy=meizzTheYear;
var mm = parseInt(meizzTheMonth)+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) {//outObjectvalue="";
   return;}
   if ( n < 10){n = "0" + n;}
   if(IsTime){//注：在这里你可以输出改成你想要的格式
      Time = new Date();
      outObjectvalue= yy + "-" + mm + "-" + n + ' ' +TimegetHours() + ':' + TimegetMinutes() + ':' + TimegetSeconds();
   }else{
      outObjectvalue= yy + "-" + mm + "-" + n;
   }
   closeLayer();
}
else {closeLayer(); alert("您所要输出的控件对象并不存在！");}
}</SCRIPT>

白开水 · 发表于 2008-1-18 20:40:19

<%
Response Write": "&Now()
%>

ASP中的日期控件

马上注册，结交更多郧西好友

发表回复