多种Web脚本语言下的日历实现_Web开发_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

多种Web脚本语言下的日历实现

作者：闵涛文章来源：闵涛的学习笔记点击数：4185 更新时间：2009/4/23 10:33:30

在Web开发中我们经常会需要开发一些和日历相关的应用，自然需要制作一些日历程序，一些大家伙比如C#，JAVA或是VB.NET这些语言以往都有不少文章和示例介绍了，所以今天我给大家说一下其他常见Web脚步语言中的日历算法逻辑和具体的实现方式，希望对大家有用。

先看看我们的实现目标，就是在网页中通过脚本语言实现如下的日历：

要实现日历就必须用到相关语言中的日期和时间函数，其中最重要的是具有下面功能的两个函数：

能返回指定日期是星期几的函数
能返回指定年份和月份一共有多少天的函数，或者可以返回指定两个日期之间相差多少天的函数

只要语言中具有上面两个功能的函数就可以轻松实现日历。

实现日历的算法逻辑大致如下：

取得当前要显示的月份的1号是在星期几
取得当前要显示的月份一共有多少天
通过HTML的方式生成一个HTML的表格来显示日历（每行显示一周，并根据需要来决定是生成5行还是6行的表格）
根据显示的月份1号所在星期几空出前面的不属于该月日期的表格单元格
根据显示的月份1号所在星期几来决定生成表格时从星期几开始生成日历显示（第一天在星期几）
根据一共有多少天来顺次生成指定天数，另外每生成七个单元格需要加入一个表格的换行
补足HTML表格空缺的单元格

剩下的就是根据不同语言中具体的函数来实现了：

下面是根据上述算法和逻辑在asp中的具体实现代码：

<style>
2

td { font-family: "宋体"; font-size:9pt}
3

</style>
4

<body bgcolor="eeeeee">
5

<table width="180" cellpadding="0" cellspacing="1" bgcolor="dddddd" align=center>
6

<%
7

'以下为ASP中通过该日历算法实现的具体代码
8

'先判断是否指定了一个年份和月份，没有则根据当前的年和月份显示
10

If Request("ReqDate")="" then
11

CurrentDate=Date
12

else
13

CurrentDate=Trim(Request("ReqDate"))
14

end if
15

pyear=year(CurrentDate)
16

pmonth=month(CurrentDate)
17

'以下的代码生成日历显示的表格头内容
19

%>
20

<tr align="LEFT" bgcolor="#dddddd">
21

<td width="14%" height="19" align="center">
22

<input type="button" value="<<" onclick="JavaScript:location.href='?ReqDate=<%=DateAdd("m",-1,CurrentDate) %>'">
23

</td>
24

<td colspan="5" align="center">
25

<%=pyear%>年<%=pmonth%>月
26

</td>
27

<td width="14%" align="center">
28

<input type="button" value=">>" onclick="JavaScript:location.href='?ReqDate=<%=DateAdd("m",1,CurrentDate)%>'">
29

</td>
30

</tr>
31

<tr align="center" bgcolor="#CCCCCC">
32

<td width="14%" height="19"> 日</td>
33

<td width="14%"> 一</td>
34

<td width="14%"> 二</td>
35

<td width="14%"> 三</td>
36

<td width="14%"> 四</td>
37

<td width="14%"> 五</td>
38

<td width="14%"> 六</td>
39

</tr>
40

<tr align=center bgcolor=ffffff height=19>
41

<%
42

'由于ASP中没有获取指定月共有多少天的函数，因此我们需要通过其他算法来获得，算法其实很简单，就是计算一下要显示月份的1日至下个月的1日一共相差几天
43

fromDate = FormatDateTime(month(CurrentDate) & "/1/" & year(CurrentDate))
44

toDate = FormatDateTime(DateAdd("m",1,fromDate))
45

'获得要显示月份的第一天为周几
46

nunmonthstart=weekday(fromDate)-1
47

'获得要显示的1日至下个月的1日一共相差几天(月份一共有多少天)
48

nunmonthend=DateDiff("d",fromDate,toDate)
49

'判断显示日历需要用几行表格来显示（每行显示7天）
50

if nunmonthstart+nunmonthend<36 then
51

maxi=36
52

else
53

maxi=43
54

end if
55

'循环生成表格并显示
56

i=1
57

do while i<maxi
58

iv=i-nunmonthstart
59

[1] [2] [3] [4] [5] 下一页

没有相关教程

教程录入：mintao 责任编辑：mintao

上一篇教程： ASP.NET2.0中创建基于XML的应用程序

下一篇教程： ASP.NET 2.0中Gridview控件高级技巧

【字体：小大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网]

　网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

同类栏目

· Web开发  · 网页制作
· 平面设计  · 网站运营
· 网站推广  · 搜索优化
· 建站心得  · 站长故事
· 互联动态

热门推荐

没有教程

赞助链接

闵涛博文

500 - 内部服务器错误。

您查找的资源存在问题，因而无法显示。

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18

闵涛站盟:医药大全-武穴网。A打造B、C、D……