<?php 
//<-------處理通過GET方法提交的變量;開始--------> 
if($HTTP_GET_VARS[year]=="") 
{ 
    $HTTP_GET_VARS[year]=date("Y"); 
} 
if($HTTP_GET_VARS[month]=="") 
{ 
    $HTTP_GET_VARS[month]=date("n"); 
} 
$month=$HTTP_GET_VARS[month]; 
$year=$HTTP_GET_VARS[year]; 
//<-------處理通過GET方法提交的變量;結(jié)束--------> 
if($year<1971) 
{ 
    echo "出錯(cuò)!"; 
    echo "<BR>"; 
    echo "<a href=$HTTP_SERVER_VARS[PHP_SELF]>Back</a>"; 
    exit(); 
} 
?> 
<table width="200" border="1" cellspacing="0" cellpadding="0" bordercolor="#E7E7E7" style="font-size:12px;" align="center"> 
<tr align="center"><td colspan="2"> 
<?php  
//<-------當(dāng)月份超出1至12時(shí)的處理;開始-------> 
if($month<1) 
{ 
    $month=12; 
    $year-=1; 
} 
if($month>12) 
{ 
    $month=1; 
    $year+=1; 
} 
//<-------當(dāng)月份超出1至12時(shí)的處理;結(jié)束-------> 
//*************************************** 
//<---------上一年,下一年,上月,下月的連接處理及輸出;開始---------> 
echo "<a href=$HTTP_SERVER_VARS[PHP_SELF]?year=".($year-1)."&month=".$month.">&lt;&lt;</a>年<a href=$HTTP_SERVER_VARS[PHP_SELF]?year=".($year+1)."&month=".$month.">&gt;&gt;</a>"; 
?> 
</td><td colspan="3"><?php echo $year."年".$month."月";?> 
</td><td colspan="2"> 
<?php  
echo "<a href=$HTTP_SERVER_VARS[PHP_SELF]?month=".($month-1)."&year=".$year.">&lt;&lt;</a>月<a href=$HTTP_SERVER_VARS[PHP_SELF]?month=".($month+1)."&year=".$year.">&gt;&gt;</a>"; 
//<--------上一年,下一年,上月,下月的連接處理及輸出;結(jié)束---------> 
   ?></td></tr> 
 <tr align=center><td><font color="red">日</font></td><td>一</td><td>二</td><td>三</td><td>四</td><td>五</td><td>六</td></tr><tr> 
<?php 
$d=date("d"); 
$FirstDay=date("w",mktime(0,0,0,$month,1,$year));//取得任何一個(gè)月的一號(hào)是星期幾,用于計(jì)算一號(hào)是由表格的第幾格開始 
$bgtoday=date("d"); 
function font_color($month,$today,$year)//用于計(jì)算星期天的字體顏色 
{ 
    $sunday=date("w",mktime(0,0,0,$month,$today,$year)); 
    if($sunday=="0") 
    { 
        $FontColor="red"; 
    } 
    else 
    { 
        $FontColor="black"; 
    } 
    return $FontColor; 
} 
function bgcolor($month,$bgtoday,$today_i,$year)//用于計(jì)算當(dāng)日的背景顏色 
{ 
    $show_today=date("d",mktime(0,0,0,$month,$today_i,$year)); 
    $sys_today=date("d",mktime(0,0,0,$month,$bgtoday,$year)); 
    if($show_today==$sys_today) 
    { 
        $bgcolor="bgcolor=#6699FF"; 
    } 
    else 
    { 
        $bgcolor=""; 
    } 
    return $bgcolor; 
} 
function font_style($month,$today,$year)//用于計(jì)算星期天的字體風(fēng)格 
{ 
    $sunday=date("w",mktime(0,0,0,$month,$today,$year)); 
    if($sunday=="0") 
    { 
        $FontStyle="<strong>"; 
    } 
    else 
    { 
        $FontStyle=""; 
    } 
    return $FontStyle; 
} 
for($i=0;$i<=$FirstDay;$i++)//此for用于輸出某個(gè)月的一號(hào)位置 
{ 
    for($i;$i<$FirstDay;$i++) 
    { 
        echo "<td align=center>&nbsp;</td>\n"; 
    } 
    if($i==$FirstDay) 
    { 
        echo "<td align=center ".bgcolor($month,$bgtoday,1,$year)."><font color=".font_color($month,1,$year).">".font_style($month,1,$year)."1</font></td>\n"; 
        if($FirstDay==6)//判斷1號(hào)是否星期六 
        { 
            echo "</tr>"; 
        } 
    } 
} 
$countMonth=date("t",mktime(0,0,0,$month,1,$year));//某月的總天數(shù) 
for($i=2;$i<=$countMonth;$i++)//輸出由1號(hào)定位,隨后2號(hào)直至月尾的所有號(hào)數(shù) 
{ 
    echo "<td align=center ".bgcolor($month,$bgtoday,$i,$year)."><font color=".font_color($month,$i,$year).">".font_style($month,$i,$year)."$i</font></td>\n"; 
    if(date("w",mktime(0,0,0,$month,$i,$year))==6)//判斷該日是否星期六 
    { 
    echo "</tr>\n"; 
    } 
} 
?> 
</table>