العربية
<!-- http://www.downcodes.com/js --> <!-- رابط HTML:--> <html> <head> <title>الصفحة الرئيسية للموقع الإلكتروني->>الصفحة الرئيسية </title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <body bgcolor="#000000" text="#999999" link="#33FF33 " vlink="#33FF33" alink="#33FF33" onLoad="setToday()"> <SCRIPT LANGUAGE="JavaScript"> <!-- ابدأ الدالة setToday() { var now = new Date(); var day = now.getDate(); فار الشهر = now.getMonth(); var year = now.getYear(); إذا (السنة < 2000) سنة = سنة + 1900؛ this.focusDay = day; document.calControl.month.selectedIndex =month; document.calControl.year.value = year; عرض التقويم (الشهر، السنة)؛ } function isFourDigitYear(year) { if (year.length != 4) { تنبيه ("عذرًا، يجب أن يتكون طول السنة من أربعة أرقام."); document.calControl.year.select(); document.calControl.year.focus(); } آخر { إرجاع صحيح؛ } } الدالة SelectDate() { var year = document.calControl.year.value; if (isFourDigitYear(year)) { var day = 0; فار الشهر = document.calControl.month.selectedIndex; عرض التقويم (الشهر، السنة)؛ } } function setPreviousYear() { var year = document.calControl.year.value; if (isFourDigitYear(year)) { var day = 0; فار الشهر = document.calControl.month.selectedIndex; سنة--؛ document.calControl.year.value = year; عرض التقويم (الشهر، السنة)؛ } } function setPreviousMonth() { var year = document.calControl.year.value; if (isFourDigitYear(year)) { var day = 0; فار الشهر = document.calControl.month.selectedIndex; إذا (الشهر == 0) { الشهر = 11؛ إذا (سنة > 1000) { سنة--؛ document.calControl.year.value = year; } } else { شهر--; } document.calControl.month.selectedIndex =month; عرض التقويم (الشهر، السنة)؛ } } function setNextMonth() { var year = document.calControl.year.value; if (isFourDigitYear(year)) { var day = 0; فار الشهر = document.calControl.month.selectedIndex; إذا (الشهر == 11) { الشهر = 0؛ سنة++؛ document.calControl.year.value = year; } آخر { شهر ++؛ } document.calControl.month.selectedIndex =month; عرض التقويم (الشهر، السنة)؛ } } function setNextYear() { var year = document.calControl.year.value; if (isFourDigitYear(year)) { var day = 0; فار الشهر = document.calControl.month.selectedIndex; سنة++؛ document.calControl.year.value = year; عرض التقويم (الشهر، السنة)؛ } } وظيفة DisplayCalendar(month, year) {month = parseInt(month); year = parseInt(year); فار ط = 0؛ vardays = getDaysInMonth(month+1,year); var firstOfMonth = تاريخ جديد (سنة، شهر، 1)؛ var beginPos = firstOfMonth.getDay(); أيام += بداية نقاط البيع؛ document.calButtons.calPage.value = "Su Mo Tu We Th Fr Sa"; document.calButtons.calPage.value += "n --------------------"; for (i = 0; i < beginPos; i++) { if ( i%7 == 0 ) document.calButtons.calPage.value += "n "; document.calButtons.calPage.value += " "; } for (i = beginPos; i < day; i++) { if ( i%7 == 0 ) document.calButtons.calPage.value += "n "; if (i-startingPos+1 < 10) document.calButtons.calPage.value += "0"; document.calButtons.calPage.value += i-startingPos+1; document.calButtons.calPage.value += " "; } for (i=days; i<42; i++) { if ( i%7 == 0 ) document.calButtons.calPage.value += "n "; document.calButtons.calPage.value += " "; } document.calControl.Go.focus(); } الدالة getDaysInMonth(month,year) { vardays; إذا (الشهر==1 || الشهر==3 || الشهر==5 || الشهر==7 || الشهر==8 || الشهر==10 || الشهر==12) يومًا=31; وإلا إذا (الشهر==4 || الشهر==6 || الشهر==9 || الشهر==11) يومًا=30; else if (month==2) { if (isLeapYear(year)) {days=29; } آخر { أيام = 28؛ } } العودة (أيام)؛ } الدالة isLeapYear (Year) { if (((Year % 4)==0) && ((Year % 100)!=0) || ((Year % 400)==0)) { return (true); } آخر { عودة (خطأ)؛ } } // النهاية --> </SCRIPT> <CENTER> <H2>万年历</H2> <FORM NAME="calControl" onSubmit="return false;"> <TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0> <TR><TD COLSPAN=7> <CENTER> <SELECT NAME="month" onChange="selectDate()"> <OPTION> العالم <OPTION> العالم <OPTION> العالم <OPTION> التاريخ <OPTION> الخيار <OPTION> الخيار <OPTION> <OPTION> الخيار <OPTION> <OPTION> الخيار <OPTION> الخيار <OPTION> الخيار </SELECT> <INPUT NAME = "year" TYPE=TEXT SIZE=4 MAXLENGTH=4> <INPUT TYPE="button" NAME="Go" value="创建" onClick="selectDate()"> </CENTER> </TD> </TR> </FORM > <FORM NAME="calButtons"> <TR><TD align="center"><textarea FONT="Courier" NAME="calPage" WRAP=no ROWS=8 COLS=24>
