response.write"<script language="vbscript">
vbscript问题
<%
response.write"<script language=vbscript>"
<!--
response.write"m=month(date()):y=year(date())"
select case m
case 1,3,5,7,8,10,12
response.write"d=31"
case 2
if (y mod 4=0 and y mod 400=0) or (y mod 100=0 and y mod 400=0) then
response.write"d=29"
else
response.write"d=28"
end if
case else
response.write"d=30"
end select
-->
response.write"</script>"
mm=request("mm")
yy=request("yy")
workmonth=yy& "-" &mm
start=yy& "-" &mm & "-" &"1"
endy=yy& "-" &mm & "-" &d
%>
这个地方endy=yy& "-" &mm & "-" &d怎么D的值取不出来呢？哪错了？
参考答案:<%
m = Month(Now)
select case m
case 1,3,5,7,8,10,12
response.write"d=31"
case 2
if (y mod 4=0 and y mod 400=0) or (y mod 100=0 and y mod 400=0) then
response.write"d=29"
else
response.write"d=28"
end if
case else
response.write"d=30"
end select
mm=request("mm")
yy=request("yy")
workmonth=yy& "-" &mm
start=yy& "-" &mm & "-" &"1"
endy=yy& "-" &mm & "-" &d
%>