一个关于万年历的问题 那为专家能够帮忙
远方 2005-10-11 07:54:25 <html>
</body>
<%
y=weekday(date)
select case y
case 1
max=30
case 2
max=31
case 3
max=30
case 4
max=31
case 5
max=30
case 6
max=31
case 7
max=30
case 8
max=31
case 9
max=30
case 10
max=31
case 11
max=30
case 12
max=31
end select
%>
<div align="center">
<table width="120" height="25" border="0" cellpadding="0" cellspacing="0">
<TR>
<% for i=1 to 7 %>
<td width="100"><div align="center"><%response.Write i %></div></td>
<% next%>
<% for j=8 to max %>
<td width=100><div align=center> <% if i mod 7=0 then %><%response.Write j &"<br>" %></div></td>
<%else
response.Write j
end if
%>
<% next%>
</TR>
</table>
</div>
</body>
</html>
以上代码 只能显示 从1到30号 一排
但不能换行
1 2 3 4 5 6 7
8 9 10
这样的形式
由于本人对循环语句 不是很熟
还请专家帮忙