大家看看我这个连动显示周的代码错在哪了?
<script language="vbscript" >
function set_myweek()
<%
thismonthfirday=year(now()) & "-" & month(now()) & "-1"
nextmonthfirday=dateadd("m",1,thismonthfirday)
totaldays=DateDiff("d",thismonthfirday,nextmonthfirday)
thismonthlasday=thismonthfirday=myyear & "-" & mymonth & totaldays
beginweek = DatePart("ww",thismonthdirday,vbMonday)
endweek = DatePart("ww",thismonthlasday,vbMonday)
if Weekday(thismonthdirday,vbMonday)=1 then
weekcount = endweek - beginweek + 1
else
weekcount = endweek - beginweek
end if
%>
document.form1.myweek.length=<%=weekcount%>
<%
i=0
do while i<weekcount
%>
document.form1.myweek.options(<%=i%>).value= <%=i+1%>
document.form1.myweek.options(<%=i%>).text= "第<%=i+1%>周"
<%
i=i+1
loop
%>
end function
</script>
目的是根据当前日期判断是那年那月那周,周数统计的算法如上,但显示weekcount=0,这是为什么?