支持火狐的网页日历-JS特效-爱易网页

支持火狐的网页日历

日期：2014-05-18　浏览次数：20265 次

以下是程序代码

<html>
<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type">
<meta name="keywords" content="站长,网页特效,js特效,广告代码,zzjs,zzjs.net,sky,www.zzjs.net,站长特效 网" />
<meta name="description" content="www.zzjs.net,站长特效网，站长必备js特效及广告代码。大量高质量js特效，提供高质量广告代码下载,尽在站长特效网" />
<title>网页日历，sky整理收集，站长特效欢迎您。</title>
<script language="JavaScript">
<!--
setCal()
function getTime() {
	var now = new Date()
	var hour = now.getHours()
	var minute = now.getMinutes()
	now = null
	var ampm = ""
	if (hour >= 12) {
		hour -= 12
		ampm = "下午"
	} else
		ampm = "上午"
	hour = (hour == 0) ? 12 : hour
	if (minute < 10)
		minute = "0" + minute
	return hour + ":" + minute + " " + ampm
}
function leapYear(year) {
	if (year % 4 == 0)
		return true
		return false
}
function getDays(month, year) {
	var ar = new Array(12)
	ar[0] = 31
	ar[1] = (leapYear(year)) ? 29 : 28
	ar[2] = 31
	ar[3] = 30
	ar[4] = 31
	ar[5] = 30
	ar[6] = 31
	ar[7] = 31
	ar[8] = 30
	ar[9] = 31
	ar[10] = 30
	ar[11] = 31
	return ar[month]
}//欢迎来到站长特效网，我们的网址是www.zzjs.net，很好记，zz站长，js就是js特效，本站收集大量高质量js代码，还有许多广告代码下载。
function getMonthName(month) {
	var ar = new Array(12)
	ar[0] = "1月"
	ar[1] = "2月"
	ar[2] = "3月"
	ar[3] = "4月"
	ar[4] = "5月"
	ar[5] = "6月"
	ar[6] = "7月"
	ar[7] = "8月"
	ar[8] = "9月"
	ar[9] = "10月"
	ar[10] = "11月"
	ar[11] = "12月"
	return ar[month]
}
function setCal() {
	var now = new Date()
	var year = now.getYear()
if (year<2000)
year=1900+year;
	var month = now.getMonth()
	var monthName = getMonthName(month)
	var date = now.getDate()
	now = null
	var firstDayInstance = new Date(year, month, 1)
	var firstDay = firstDayInstance.getDay()
	firstDayInstance = null
	var days = getDays(month, year)
	drawCal(firstDay + 1, days, date, monthName, year)
}//欢迎来到站长特效网，我们的网址是www.zzjs.net，很好记，zz站长，js就是js特效，本站收集大量高质量js代码，还有许多广告代码下载。
function drawCal(firstDay, lastDate, date, monthName, year) {
	var headerHeight = 50
	var border = 2
	var cellspacing = 4
	var headerColor = "midnightblue"
	var headerSize = "-1"
	var colWidth = 50
	var dayCellHeight = 10
	var dayColor = "darkblue"
	var cellHeight = 20
	var todayColor = "red"
	var timeColor = "purple"
	var text = ""
	text += '<CENTER>'
	text += '<TABLE BORDER=1'  + ' CELLSPACING=0'  + 'style="font-size: 9pt">'
	text += 	'<TH COLSPAN=7 HEIGHT=' + headerHeight + '>'
	text += 		''
	text += 			year+'年'+ monthName + '日历'
	text += 		''
	text += 	'</TH>'
	var openCol = '<TD WIDTH=' + colWidth + ' HEIGHT=' + dayCellHeight + '>'
	openCol += '<FONT COLOR="' + dayColor + '">'
	var closeCol = '</FONT></TD>'
	var weekDay = new Array(7)
	weekDay[0] = "星期天"
	weekDay[1] = "星期一"
	weekDay[2] = "星期二"
	weekDay[3] = "星期三"
	weekDay[4] = "星期四"
	weekDay[5] = "星期五"
	weekDay[6] = "星期六"
	text += '<TR ALIGN="center" VALIGN="center"  style="font-size: 9pt">'
	for (var dayNum = 0; dayNum < 7; ++dayNum) {
		text += openCol + weekDay[dayNum] + closeCol
	}
	text += '</TR>'
	var digit = 1
	var curCell = 1
	for (var row = 1; row <= Math.ceil((lastDate + firstDay - 1) / 7); ++row) {
		text += '<TR ALIGN="right" VALIGN="top" style="font-size: 9pt">'
		for (var col = 1; col <= 7; ++col) {
			if (digit > lastDate)
				break
			if (curCell < firstDay) {
				text += '<TD></TD>';
				curCell++
			} else {
				if (digit == date) {
					text += '<TD HEIGHT=1>'
					text += '<FONT COLOR="' + todayColor + '">'
					text += digit
					text += '</FONT><BR>'
					text += '<FONT COLOR="' + timeColor + '" SIZE=2 style="font-size: 9pt">'
					text += '<CENTER>' + getTime() + '</CENTER>'
					text += '</FONT>'
					text += '</TD>'
				} else
					text += '<TD H</div></div>

<div class="clearfix"></div>
                    </div>
                    <nav aria-label="...">
                        <ul class="pager">
                            <li class="previous"><a href="4667">上一篇：狡猾的按钮特效</a></li>

<li class="next"><a href="792">下一篇：日期多种显示效果</a></li>
                        </ul>
                    </nav>

<div class="alert alert-warning" role="alert">
                        <strong>免责声明：</strong> 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
                    </div>

<div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34158' title='黑莓高管：黑莓能作为家“小众公司”活下来' target="_blank">
                        黑莓高管：黑莓能作为家“小众公司”活下来</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/6922' title='打车软件火了 恶性循环来了' target="_blank">
                        打车软件火了 恶性循环来了</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34313' title='京东微信入口战略能否助力618大促创流量巅峰' target="_blank">
                        京东微信入口战略能否助力618大促创流量巅峰</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34296' title='余额宝收益率跌破5% 银行系宝宝收益率赶超' target="_blank">
                        余额宝收益率跌破5% 银行系宝宝收益率赶超</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34217' title='广电地方营业厅的一句“罚停”，暴露出了他们的本质' target="_blank">
                        广电地方营业厅的一句“罚停”，暴露出了他们的本质</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34226' title='IT时代周刊总编辑曹健：投资人刘志硕印象记' target="_blank">
                        IT时代周刊总编辑曹健：投资人刘志硕印象记</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34250' title='微信将商场O2O战火烧到了阿里巴巴老家' target="_blank">
                        微信将商场O2O战火烧到了阿里巴巴老家</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34368' title='湘鄂情剥离餐饮业务进军大数据的底气在哪里？' target="_blank">
                        湘鄂情剥离餐饮业务进军大数据的底气在哪里？</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34259' title='诺基亚若没加入微软，只不过是另一个HTC而已' target="_blank">
                        诺基亚若没加入微软，只不过是另一个HTC而已</a></li></div>
                   
                
        </ol>
    </div>
</div>

</div>

</div>
            </div>
            <div class="clearfix"></div>

<footer class=" footer navbar-bottom">
<em>友情链接：</em>
    
      <a href="http://www.aiyiweb.com/" target="_blank">爱易网 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">云虚拟主机技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">云服务器技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">程序设计技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">开发网站 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">APP开发教程 </a>            
    
<br />
<script type="text/javascript">(function(){document.write(unescape('%3Cdiv id="bdcs"%3E%3C/div%3E'));var bdcs = document.createElement('script');bdcs.type = 'text/javascript';bdcs.async = true;bdcs.src = 'http://znsv.baidu.com/customer_search/api/js?sid=15239353030108964139' + '&plate_url=' + encodeURIComponent(window.location.href) + '&t=' + Math.ceil(new Date()/3600000);var s = document.getElementsByTagName('script')[0];s.parentNode.insertBefore(bdcs, s);})();</script>

Copyright © 2013-2026 爱易网页 当前在线：335人　
        网站在5时55分59秒内访问总人数：54526人
    当前 6.28%
　<a href="https://beian.miit.gov.cn" target="_blank">粤ICP备18100884号-2 </a>
<script charset="UTF-8" id="LA_COLLECT" src="//sdk.51.la/js-sdk-pro.min.js"></script>
<script>LA.init({ id: "JszEmKrtpbU59dY5", ck: "JszEmKrtpbU59dY5" })</script>

</footer>

</div>
   
</body>
</html>