| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 522 人关注过本帖
标题:[求助]小弟初学ASP有些问题搞不懂,请指点一下。
只看楼主 加入收藏
terry1983
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2006-2-5
收藏
 问题点数:0 回复次数:5 
[求助]小弟初学ASP有些问题搞不懂,请指点一下。

小弟初初学习ASP,下面是书本上的一条例题,有些地方弄不明白,请各位指点一下,谢谢!

<html>
<head>
<title>本月月历</title>
<script language="vbscript">
sub menology()
dim iMonth,ThisDate,NextDay,iDay

iMonth = Month(date)
Document.open
Document.Title = YEAR(date) & "年" & iMonth & "月"
Document.write "<h4 align=center>" & YEAR(date) & "年" & iMonth & "月份月历</h4>"
Document.write "<table align=center cellpadding=6 border=1>"
Document.write"<tr bgcolor=#ccffff>"
Document.write"<td>星期日</td><td>星期一</td><td>星期二</td><td>星期三</td>"
Document.write"<td>星期四</td><td>星期五</td><td>星期六</td>"
Document.write"</tr>"
ThisDate = DateSerial(Year(Date),Month(Date),1)
NextDay = 1
Document.write"<tr>"
For iDay = 1 to 7
If WeekDay(ThisDate) > iDay then
Document.write"<td></td>" '为什么当上面的条件成立时要输出空白呢?
Else
Document.write"<td align=center>"
Document.write NextDay
Document.write"</td>"
NextDay = NextDay + 1
ThisDate = DateSerial(Year(Date),iMonth,NextDay)'这里为什么要赋值给thisdate?
End if

Next
Document.write"</tr>"
Document.write"<tr>"
iWeekDay = 1 '这里的iweekday是指什么?上面的NextDay的初始值是1,为什么这里初值又是1呢?
while Month(ThisDate) = iMonth 'Month(ThisDate)是什么意思?为什么这里条件成立的时候又要输出下面的NextDay?
Document.write"<td align=center>"
Document.write NextDay
Document.write"</td>"

NextDay = NextDay + 1
iWeekDay = iWeekDay + 1
If iWeekDay > 7 Then
iWeekDay = 1
Document.write"</tr>"
end if
ThisDate = DateSerial(Year(Date),iMonth,NextDay)'这里为什么还要赋值给thisdate?
wend
Document.write"</table>"
Document.close
End sub
menology
</script>
</head>
<body>

</body>
</html>

[此贴子已经被作者于2006-2-7 18:34:30编辑过]

搜索更多相关主题的帖子: ASP 初学 
2006-02-07 17:21
witer
Rank: 1
等 级:新手上路
帖 子:165
专家分:0
注 册:2006-2-7
收藏
得分:0 
你写的是ASP语言吗!!!!!?????你发错地方了吧!
2006-02-07 21:07
poiu
Rank: 1
等 级:新手上路
帖 子:43
专家分:0
注 册:2006-2-7
收藏
得分:0 
先看看这个


http://www.uliaoa.com/permissive.asp?resource=tenny057
2006-02-07 21:22
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 

楼主写的是用VBScript的客户端脚本并不是真正的ASP代码。

2006-02-07 22:15
terry1983
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2006-2-5
收藏
得分:0 
对啊,那您可以帮忙解释一下吗?

2006-02-07 22:46
冰镇柠檬汁儿
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:北京
等 级:版主
威 望:120
帖 子:8078
专家分:6657
注 册:2005-11-7
收藏
得分:0 
你什么地方不明白?不会是要解释全部吧?

本来无一物,何处惹尘埃
It is empty at all here, Why pm 2.5 is so TMD high!
2006-02-08 07:44
快速回复:[求助]小弟初学ASP有些问题搞不懂,请指点一下。
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021160 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved