<html>
<head>
<title>第一习作阶段-编写简单的日历程序</title>
</head>
<body>
<%
a=now()
b=day(a)'返回 1 到 31 之间的一个整数(包括 1 和31),代表某月中的一天。
c=datepart("w",a)'返回给定日期的指定部分。DatePart 函数用于计算日期并返回指定的时间间隔。例如使用 DatePart 计算某一天是星期几或当前的时间。"w"返回当周的第几天.
d=year(a)'返回一个代表某年的整数。
e=month(a)'返回 1 到 12 之间的一个整数(包括 1 和 12),代表一年中的某月
f=datepart("w",a-b)'返回当月第一天在星期几.
g=DateSerial(d,e,1)'返回当月第一天日期.
h=DateSerial(d,e+1,1)'返回下个月第一天日期.
i=h-g'返回当月的天数
%>
<div align="center"> <%=d%>年<%=e%>月</div>
<hr width="400" />
<table width="400" border="1" align="center">
<tr>
<td>星期日</td>
<td>星期一</td>
<td>星期二</td>
<td>星期三</td>
<td>星期四</td>
<td>星期五</td>
<td>星期六</td>
</tr>
<tr>
<%
if f+i<36 then'判断显示日历需要用几行表格来显示(每行显示7天)
gezi=35
else
gezi=42
end if
'循环生成表格并显示.
for j=1 to gezi
iv=j-f
if j>f and j<f+i then
'如果为显示的是今天则用蓝色字体显示
if iv=day(now) and month(now)=e and year(now)=d then
response.write("<td align=right><font color=blue>"&iv&"</font></td>")
else
response.write("<td align=right>"&iv&"</td>")
end if
else
response.write("<td> </td>")
end if
'如果能被7整除(每行显示7个)则输出一个换行
if j mod 7=0 then
response.write("</tr><tr>")
end if
next
%>
</table>
</body>
</html>
具体都啥意思
參考答案:你把程序代码放到记事本里,然后另存,名字随便,记得后缀一定要是.html
比如名字是 ss
保存是就写成 ss.html
然后打开就可以看到效果了