分类:
2008-06-11 09:15:29
来自google
<?php
error_reporting(0);
global $HTTP_GET_VARS;
//<-------处理通过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方法提交的变量;结束-------->
if($year<1971)
{
echo "出错!";
echo "
";
echo "Back";
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
//<-------当月份超出1至12时的处理;开始------->
if($month<1)
{
$month=12;
$year-=1;
}
if($month>12)
{
$month=1;
$year+=1;
}
//<-------当月份超出1至12时的处理;结束------->
//***************************************
//<---------上一年,下一年,上月,下月的连接处理及输出;开始--------->
echo ".($year-1)."&month=".$month."><<年.($year+1)."&month=".$month.">>>";
?>
</td><td colspan="3"><?php echo $year."年".$month."月";?>
</td><td colspan="2">
<?php
echo ".($month-1)."&year=".$year."><<月.($month+1)."&year=".$year.">>>";
//<--------上一年,下一年,上月,下月的连接处理及输出;结束--------->
?></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));//取得任何一个月的一号是星期几,用于计算一号是由表格的第几格开始
$bgtoday=date("d");
function font_color($month,$today,$year)//用于计算星期天的字体颜色
{
$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)//用于计算当日的背景颜色
{
$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)//用于计算星期天的字体风格
{
$sunday=date("w",mktime(0,0,0,$month,$today,$year));
if($sunday=="0")
{
$FontStyle="";
}
else
{
$FontStyle="";
}
return $FontStyle;
}
for($i=0;$i<=$FirstDay;$i++)//此for用于输出某个月的一号位置
{
for($i;$i<$FirstDay;$i++)
{
echo " \n";
}
if($i==$FirstDay)
{
echo ".bgcolor($month,$bgtoday,1,$year).">.font_color($month,1,$year).">".font_style($month,1,$year)."1 \n";
if($FirstDay==6)//判断1号是否星期六
{
echo "";
}
}
}
$countMonth=date("t",mktime(0,0,0,$month,1,$year));//某月的总天数
for($i=2;$i<=$countMonth;$i++)//输出由1号定位,随后2号直至月尾的所有号数
{
echo ".bgcolor($month,$bgtoday,$i,$year).">.font_color($month,$i,$year).">".font_style($month,$i,$year)."$i \n";
if(date("w",mktime(0,0,0,$month,$i,$year))==6)//判断该日是否星期六
{
echo "\n";
}
}
?>