// Main: popCtrl is the widget beyond which you want this calendar to appear;
//    dateCtrl is the widget into which you want to put the selected date.
// i.e.: <input type="text" name="dc" style="text-align:center" readonly><INPUT type="button" value="V" onclick="fPopCalendar(dc,dc);return false">
function fPopCalendar(popCtrl, dateCtrl,strDate){
 if (popCtrl == previousObject){
  if (VicPopCal.style.visibility == "visible"){
  HiddenDiv();
  return true;
  }
  
 }
 previousObject = popCtrl;
 gdCtrl = dateCtrl;
 fInitialDate(strDate);
 fSetYearMon(giYear, giMonth); 
 var point = fGetXY(popCtrl);
 with (VicPopCal.style) {
  left = point.x;
top = point.y+popCtrl.offsetHeight;
width = VicPopCal.offsetWidth;
width = 210; //
height = VicPopCal.offsetHeight;
fToggleTags(point); 
visibility = 'visible';
 }
}// Added by Han Chen
function fInitialDate(strDate){
if( strDate == null || strDate.length != 10 )
return false;var sYear = strDate.substring(0,4);
var sMonth = strDate.substring(5,7);
var sDay  = strDate.substring(8,10);if( sMonth.charAt(0) == '0' ) { sMonth = sMonth.substring(1,2); }
if( sDay.charAt(0)  == '0' ) { sDay  = sDay.substring(1,2);  }var nYear = parseInt(sYear );
var nMonth = parseInt(sMonth);
var nDay  = parseInt(sDay );if ( isNaN(nYear ) ) return false;
if ( isNaN(nMonth) ) return false;
if ( isNaN(nDay ) ) return false;var arrMon = new Array(12);
arrMon[ 0] = 31; arrMon[ 1] = nYear % 4 == 0 ? 29:28;
arrMon[ 2] = 31; arrMon[ 3] = 30;
arrMon[ 4] = 31; arrMon[ 5] = 30;
arrMon[ 6] = 31; arrMon[ 7] = 31;
arrMon[ 8] = 30; arrMon[ 9] = 31;
arrMon[10] = 30; arrMon[11] = 31;if ( nYear < 1900 || nYear > 2100 ) return false;
if ( nMonth < 1 || nMonth > 12 ) return false;
if ( nDay < 1 || nDay > arrMon[nMonth - 1] ) return false;giYear = nYear;
giMonth = nMonth;
giDay  = nDay;
return true;
}
function fBuildCal(iYear, iMonth) {
 var aMonth=new Array();
 for(i=1;i<7;i++)
  aMonth[i]=new Array(i);
 
 var dCalDate=new Date(iYear, iMonth-1, 1);
 var iDayOfFirst=dCalDate.getDay();
 var iDaysInMonth=new Date(iYear, iMonth, 0).getDate();
 var iOffsetLast=new Date(iYear, iMonth-1, 0).getDate()-iDayOfFirst+1;
 var iDate = 1;
 var iNext = 1; for (d = 0; d < 7; d++)
aMonth[1][d] = (d<iDayOfFirst)?-(iOffsetLast+d):iDate++;
 for (w = 2; w < 7; w++)
  for (d = 0; d < 7; d++)
aMonth[w][d] = (iDate<=iDaysInMonth)?iDate++:-(iNext++);
 return aMonth;
}function fDrawCal(iYear, iMonth, iCellHeight, sDateTextSize) {
 var WeekDay = new Array("日","一","二","三","四","五","六");
 var styleTD = " bgcolor='"+gcBG+"' bordercolor='"+gcBG+"' valign='middle' align='center' height='"+iCellHeight+"' style='font:bold arial "+sDateTextSize+";";      //Coded by Hcy email:[email protected] with (document) {
write("<tr>");
for(i=0; i<7; i++){
write("<td "+styleTD+"color:maroon' >"+ WeekDay[i] + "</td>");
}
write("</tr>");  for (w = 1; w < 7; w++) {
write("<tr>");
for (d = 0; d < 7; d++) {
write("<td id=calCell "+styleTD+"cursor:hand;' onMouseOver='this.bgColor=gcToggle' onMouseOut='this.bgColor=gcBG' onclick='fSetSelected(this)'>");
write("<font id=cellText Victor='Hcy_Flag'> </font>"); 
write("</td>")
}
write("</tr>");
}
 }
}function fUpdateCal(iYear, iMonth) {
 myMonth = fBuildCal(iYear, iMonth);
 var i = 0;
 for (w = 0; w < 6; w++)
for (d = 0; d < 7; d++)
with (cellText[(7*w)+d]) {
Victor = i++;
if (myMonth[w+1][d]<0) {
color = gcGray;
innerText = -myMonth[w+1][d];
}else{
color = ((d==0)||(d==6))?"red":"black";
innerText = myMonth[w+1][d];
}
}
}function fSetYearMon(iYear, iMon){
 tbSelMonth.options[iMon-1].selected = true;
 for (i = 0; i < tbSelYear.length; i++)
if (tbSelYear.options[i].value == iYear)
tbSelYear.options[i].selected = true;
 fUpdateCal(iYear, iMon);
}function fPrevMonth(){
 var iMon = tbSelMonth.value;
 var iYear = tbSelYear.value;
 
 if (--iMon<1) {
 iMon = 12;
 iYear--;
 }
 
 fSetYearMon(iYear, iMon);
}function fNextMonth(){
 var iMon = tbSelMonth.value;
 var iYear = tbSelYear.value;
 
 if (++iMon>12) {
 iMon = 1;
 iYear++;
 }
 
 fSetYearMon(iYear, iMon);
}
var gMonths = new Array("一月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月");with (document) {
write("<Div id='VicPopCal' style='POSITION:absolute;VISIBILITY:hidden;border:2px ridge;z-index:100;'>");
write("<table border='0' bgcolor='#cccccc'>");
write("<TR>");
write("<td valign='middle' align='center'><input type='button' name='PrevMonth' value='<' style='height:20;width:20;FONT:bold' onClick='fPrevMonth()'>");
write(" <SELECT name='tbSelYear' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won'>");
for(i=1950;i<2015;i++)
write("<OPTION value='"+i+"'>"+i+" 年</OPTION>");
write("</SELECT>");
write(" <select name='tbSelMonth' onChange='fUpdateCal(tbSelYear.value, tbSelMonth.value)' Victor='Won'>");
for (i=0; i<12; i++)
write("<option value='"+(i+1)+"'>"+gMonths[i]+"</option>");
write("</SELECT>");
write(" <input type='button' name='PrevMonth' value='>' style='height:20;width:20;FONT:bold' onclick='fNextMonth()'>");
write("</td>");
write("</TR><TR>");
write("<td align='center'>");
write("<DIV style='background-color:teal'><table width='100%' border='0'>");
fDrawCal(giYear, giMonth, 20, '12');
write("</table></DIV>");
write("</td>");
write("</TR><TR><TD align='center'>");
write("<TABLE width='100%'><TR><TD colspan=2 align='center'>");
write("时间:<select Victor='Won' name=iHour>")
var j
for (i=0; i<24; i++){
if(i<10){
j="0"+i
}else{
j=i;
};
write("<option value='"+j+"'>"+j+"</option>");
}
write("</SELECT>小时");
write("<select Victor='Won' name=iMin>")
for (i=00; i<60; i++){
if(i<10){
k="0"+i
}else{
k=i;
};
write("<option value='"+k+"'>"+k+"</option>");
}
write("</SELECT>分钟");
write("</td></TR>");
write("<TR><TD align='center'>");
write("<input name=nDate type=hidden><B style='cursor:hand' onMouseOver='this.style.color=gcToggle' onMouseOut='this.style.color=0' onclick='checkD()'>提交</b>");
write("</td><td algin='center'><B style='cursor:hand' onclick='HiddenDiv()' onMouseOver='this.style.color=gcToggle' onMouseOut='this.style.color=0'>关闭</B>");
write("");write("</td></tr></table>");
write("</TD></TR>");
write("</TABLE></Div>");
}
</script>
<br></div>
<div align="center">
<form method="POST" name="form1" action="Save_LSHJ.asp" onsubmit="javascript:return check();">
<input type="hidden" name="RYBH"  readonly size="30" style="color: #000080; font-size: 9pt; border: 1px solid #000000; font-family:Verdana" value="<%=Trim(RYBH)%>" maxlength="21">
<table border="1" width="717" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#000000" id="table2" height="241">
<tr> <td align="right" height="241">
<p align="center">
<font color="#FF0000">*</font> 时间:&nbsp;
<input type="text" name="KSSJ" size="30" style="color: #000080; font-size: 9pt; border: 1px solid #000000; font-family:Verdana" id="KSSJ" onclick="fPopCalendar(KSSJ,KSSJ);return false" class="input" readonly> </td>
</tr>
</table>
</div>
<p align="center"><input type="submit" value=" 提 交 " name="Sumbit">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<input type="reset" value=" 重 置 " name="reset"></form></p>
<p align="center"> </p>
<p align="center"> </p>
</body>
</html>