本文实例讲述了服务器端编程语言(专业超文本预处理器的缩写)实现的日历程序。分享给大家供大家参考。具体如下：

？php /* * php输出日历程序*/header(' Content-type : text/html；charset=utf-8 ')；$year=(！isset($ _ GET[' year '])| | $ _ GET[' year ']==' ')？日期(' Y'):$_GET['年'];$month=(！isset($_GET['月])||$_GET['月']==' ')?日期(' n'):$_GET['月'];$ CurURl=$ _ SERVER[' PHP _ Self ']；if(1971美元)年){ echo '出错!'；回声“BR”；echo 'a href='，$curUrl，' Back/a '；exit()；} ?表格宽度='200 '边框='1 '单元格间距='0 '单元格填充=' 0 '边框颜色=' # E7E 7 '样式=' font-size :12 px'align=' center ' tr align=' center ' TD col span=' 2 '？php //-当月份超出一至12时的处理；开始-if($第1个月){ $ month=12$ year-=1；} if($ month 12){ $ month=1；$ year=1；} //- 当月份超出一至12时的处理；结束- //- 上一年，下一年，上月，下月的连接处理及输出；开始- echo 'a href='，$curUrl，'？年份='。($ 1年期)."月份='。每月美元a .年a href='，$curUrl，'？年份='。($ 1年)。"月='。每月美元/a '；/tdtd colspan='3 '？php echo $year .年。每月美元。月；/tdtd colspan='2 '？php echo 'a href='，$curUrl，'？月='。($月-1)."年份='。一年一美元a .月a href='，$curUrl，'？月='。($月1)。"年份='。一年一美元/a '；//- 上一年，下一年，上月，下月的连接处理及输出；结束- ?/TD/tr/tr align=center TD font color=' red '日/font/tdtd一/tdtd二/tdtd三/tdtd四/tdtd五/tdtd六/td/trtr？PHP $ d=日期(' d ')；$ FirstDay=日期(' w '，mktime(0，0，0，$月，1,$年));//取得任何一个月的一号是星期几，用于计算一号是由表格的第几格开始$ bgtoday=日期(' d ')；函数font _ color($月，$今日，$年){//用于计算星期天的字体颜色$sunday=date('w '，mktime(0，0，0，$month，$today，$ year))；if($ Sunday==' 0 '){ $ font color=' red '；} else { $ FontColor=' black}返回$ FontColor}函数bgcolor($月，$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=# 6699 ff '；} else { $ bgcolor=}返回$ bgcolor}函数font _ style($月，$今日，$年){//用于计算星期天的字体风格$sunday=date('w '，mktime(0，0，0，$month，$today，$ year))；if($ Sunday==' 0 '){ $ font style=' strong '；} else { $ FontStyle=}返回$ FontStyle}为($ I=0；$ i=$ FirstDay$i ){//此为用于输出某个月的一号位置对于($ I；$ I $ first day $ I){ echo ' TD align=center/TD n '；} if($ I==$ First DaY){ echo ' TD align=center ' .bgcolor($月，$bgtoday，1，$year)，' font color=' .字体颜色($月，1,$年),'。font _ style($月，1,$年)，' 1/font/TD n '；if($FirstDay==6){//判断一号是否星期六echo '/tr '；} } } $countMonth=date('t '，mktime(0，0，0，$month，1，$ year))；//某月的总天数for($ I=2；$ i=$ countMonth$i ){//输出由一号定位，随后2号直至月尾的所有号数回声“td align=center ”.bgcolor($月，$bgtoday，$i，$year)，' font color=' .字体颜色($月，$i，$year，' .font _ style($月，$我，$年)，' $ I/font/TD n '；if(date('w '，mktime(0，0，0，$月，$我，$年))==6){//判断该日是否星期六echo '/tr n '；} } ?/tablephp输出的日历效果如下图：

希望本文对大家学习服务器端编程语言(专业超文本预处理器的缩写)程序设计有所帮助。