<HTML><HEAD><TITLE>时间选择</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb_2312-80">
<BODY bgColor=#C5C5C5 onload=fload()>
<SCRIPT language="JavaScript" type="text/JavaScript">
var gdCtrl = new Object();
var goSelectTag = new Array();
var gcGray = "#808080";
var gcToggle = "#ffff00";
var gcBG = "#99CCFF";
var bnCancel = "red";
var bnSelect = "lightgreen";
var previousObject = null;
var gdCurDate = new Date();
var giYear = gdCurDate.getFullYear();
var giMonth = gdCurDate.getMonth()+1;
var giDay = gdCurDate.getDate();
var gCalMode = "";
var gCalDefDate = "";
var CAL_MODE_NOBLANK = "2";
function fSetDate(iYear, iMonth, iDay){
//VicPopCal.style.visibility = "hidden";
if ((iYear == 0) && (iMonth == 0) && (iDay == 0)){
//清空时显示的字符串
gdCtrl.value = "";
}else{
iMonth = iMonth + 100 + "";
iMonth = iMonth.substring(1);
iDay = iDay + 100 + "";
iDay = iDay.substring(1);
//实际显示的字符串
gdCtrl.value = iYear+"-"+iMonth+"-"+iDay+" "+selTime.value + ":00";
}
for (i in goSelectTag)
goSelectTag[i].style.visibility = "visible";
goSelectTag.length = 0;
window.returnValue=gdCtrl.value;
window.close();
}
function HiddenDiv()
{
var i;
VicPopCal.style.visibility = "hidden";
for (i in goSelectTag)
goSelectTag[i].style.visibility = "visible";
goSelectTag.length = 0;
}
function fSetSelected(aCell){
var iOffset = 0;
var iYear = parseInt(tbSelYear.value);
var iMonth = parseInt(tbSelMonth.value);
aCell.bgColor = gcBG;
with (aCell.children["cellText"]){
var iDay = parseInt(innerText);
if (color==gcGray)
iOffset = (Victor<10)?-1:1;
/*** below temp patch by maxiang ***/
if( color == gcGray ){
iOffset = (iDay < 15 )?1:-1;
}
/*** above temp patch by maxiang ***/
iMonth += iOffset;
if (iMonth<1) {
iYear--;
iMonth = 12;
}else if (iMonth>12){
iYear++;
iMonth = 1;
}
}
fSetDate(iYear, iMonth, iDay);
}
function Point(iX, iY){
this.x = iX;
this.y = iY;
}
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-size:12px; ";
with (document) {
write("<tr>");
for(i=0; i<7; i++)
write("<td "+styleTD+" color:#990099' >" + 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 ><b> </b></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{
// Modified by maxiang for we need
// Saturday displayed in blue font color.
//color = ((d==0)||(d==6))?"red":"black";
if( d == 0 ){
color = "red";
}else if( d == 6 ){
color = "blue";
}else{
color = "black";
}
// End of above maxiang
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);
}
function fToggleTags(){
with (document.all.tags("SELECT")){
for (i=0; i<length; i++)
if ((item(i).Victor!="Won")&&fTagInBound(item(i))){
item(i).style.visibility = "hidden";
goSelectTag[goSelectTag.length] = item(i);
}
}
}
function fTagInBound(aTag){
with (VicPopCal.style){
var l = parseInt(left);
var t = parseInt(top);
var r = l+parseInt(width);
var b = t+parseInt(height);
var ptLT = fGetXY(aTag);
return !((ptLT.x>r)||(ptLT.x+aTag.offsetWidth<l)||(ptLT.y>b)||(ptLT.y+aTag.offsetHeight<t));
}
}
function fGetXY(aTag){
var oTmp = aTag;
var pt = new Point(0,0);
do {
pt.x += oTmp.offsetLeft;
pt.y += oTmp.offsetTop;
oTmp = oTmp.offsetParent;
} while(oTmp.tagName!="BODY");
return pt;
}
// 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, mode, defDate){
gCalMode = mode;
gCalDefDate = defDate;
if (popCtrl == previousObject){
if (VicPopCal.style.visibility == "visible"){
//HiddenDiv();
return true;
}
}
previousObject = popCtrl;
gdCtrl = dateCtrl;
fSetYearMon(giYear, giMonth);
var point = fGetXY(popCtrl);
if( gCalMode == CAL_MODE_NOBLANK ){
document.all.CAL_B_BLANK.style.visibility = "hidden";
}else{
document.all.CAL_B_BLANK.style.visibility = "visible";
}
with (VicPopCal.style) {
left = point.x;
top = point.y+popCtrl.offsetHeight;
width = VicPopCal.offsetWidth;
height = VicPopCal.offsetHeight;
fToggleTags(point);
visibility = 'visible';
}
}
var gMonths = new Array("1","2","3","4","5","6","7","8","9","10","11","12");
with (document) {
write("<Div id='VicPopCal' style='OVERFLOW:hidden;POSITION:absolute;VISIBILITY:hidden;border:0px ridge;width:100%;height:100%;top:0;left:0;z-index:100;overflow:hidden'>");
write("<table border='0' bgcolor='#3366CC'>");
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=1930;i<2100;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:#000066'><table width='100%' border='0'>");
fDrawCal(giYear, giMonth, 8, '12');
write("</table></DIV>");
write("</td>");
write("</TR>");
//add by X.J.ZHANG
write("<TR><TD>");
write(" <B style='color:"+gcBG+";cursor:hand; font-size:12px' onMouseOver='this.style.color=gcToggle' onMouseOut='this.style.color=gcBG'>时间： </B><SELEC
存储管理系统 （194个子文件） 
OutAdd.aspx 7KB DbdAdd.aspx 7KB InAdd.aspx 7KB GainAdd.aspx 6KB LostAdd.aspx 6KB top.aspx 6KB ProductAdd.aspx 4KB InDetailAdd.aspx 4KB GainDetailAdd.aspx 4KB OutAddDetail.aspx 4KB StatGainLost.aspx 4KB StatDbd.aspx 4KB StatInOut.aspx 4KB CompanyAdd.aspx 4KB LostDetailAdd.aspx 3KB DbdDetailAdd.aspx 3KB StorageAdd.aspx 3KB ProductList.aspx 3KB CompanyList.aspx 3KB DbdList.aspx 3KB SelCompany.aspx 3KB InList.aspx 3KB OutList.aspx 3KB LostList.aspx 3KB GainList.aspx 3KB SelProduct.aspx 3KB StorageList.aspx 2KB ProductType.aspx 2KB StockList.aspx 2KB SelStorage.aspx 2KB mid.aspx 1KB Default.aspx 856B left.aspx 786B main.aspx 445B Web.Config 3KB CommonFun.cs 24KB Storage.cs 8KB Bill.cs 8KB BillDetail.cs 7KB Company.cs 6KB Product.cs 6KB WebHelper.cs 5KB DbdAdd.aspx.cs 5KB CompanyList.aspx.cs 5KB OutAdd.aspx.cs 5KB GainAdd.aspx.cs 5KB LostAdd.aspx.cs 5KB ProductType.cs 5KB InAdd.aspx.cs 5KB BillType.cs 4KB ProductAdd.aspx.cs 4KB StorageList.aspx.cs 3KB ProductList.aspx.cs 3KB LostList.aspx.cs 3KB GainList.aspx.cs 3KB OutList.aspx.cs 3KB InList.aspx.cs 3KB DbdList.aspx.cs 3KB ProductType.aspx.cs 3KB CompanyAdd.aspx.cs 2KB LostDetailAdd.aspx.cs 2KB GainDetailAdd.aspx.cs 2KB OutAddDetail.aspx.cs 2KB DbdDetailAdd.aspx.cs 2KB InDetailAdd.aspx.cs 2KB SelCompany.aspx.cs 2KB StorageAdd.aspx.cs 2KB SelProduct.aspx.cs 2KB SelStorage.aspx.cs 2KB StatGainLost.aspx.cs 1KB StatInOut.aspx.cs 1KB StatDbd.aspx.cs 1KB StockList.aspx.cs 1KB top.aspx.cs 524B MasterPage.master.cs 425B left.aspx.cs 413B main.aspx.cs 413B mid.aspx.cs 412B Default.aspx.cs 409B Style.css 8KB Style.css 7KB menuStyle.css 1KB mycss2.css 1KB linker.css 458B Thumbs.db 70KB Microsoft.Practices.EnterpriseLibrary.Common.dll 92KB Microsoft.Practices.EnterpriseLibrary.Data.dll 68KB Microsoft.Practices.ObjectBuilder.dll 60KB
login01.gif 34KB StatHistory1.gif 27KB StatHistory.gif 25KB top.gif 15KB k01.gif 7KB k03.gif 7KB header_01.gif 3KB k02.gif 2KB login_bg.gif 2KB Icon_edit.gif 1KB Icon_del.gif 1KB Icon_add.gif 1KB共 194 条
- 1
- 2
资源评论
wenbi1314258
- 粉丝: 7
- 资源: 11
最新资源
- [AB PLC例程源码]示例程序2（船用）.zip
- [AB PLC例程源码]上海飞奥做的天燃器末站PLC系统程序.zip
- [AB PLC例程源码]水厂程序.zip
- [AB PLC例程源码]水厂程序(1).zip
- [AB PLC例程源码]小型压合机.zip
- [AB PLC例程源码]天津锦湖轮胎的设备程序.zip
- [AB PLC例程源码]污水厂的处理系统.zip
- [AB PLC例程源码]一个500伺服程序.zip
- [AB PLC例程源码]一个DNET的SLC500实例.zip
- [AB PLC例程源码]一个AB PID控制的例子.zip
- [AB PLC例程源码]一个RSEmulator5000的测试小程序.zip
- [AB PLC例程源码]一个PLC5实例.zip
- [AB PLC例程源码]一个RSLOGIX500编的程序.zip
- [AB PLC例程源码]一条自动输送生产线程序(SLC500).zip
- [AB PLC例程源码]一个初学者可以看懂的SLC500 程序.zip
- [AB PLC例程源码]一个自己做的AB的pid模拟程序，供新人学习.zip
资源上传下载、课程学习等过程中有任何疑问或建议，欢迎提出宝贵意见哦~我们会及时处理！
点击此处反馈
