asp使用Weekday函數計算項目的結束時間

今天看到一個帖子求項目完成的時間，需求是這樣的：
給你一個項目的開始時間，給你項目總需求的天數，求項目的項目結束時間？注意：周六周日為休息日。
在asp編程開發中，計算時間很容易，直接用項目開始時間+天數，即可得到項目結束時間，但這里麻煩就在要排除周六和周日這兩個休息時間。
經過思考，代碼寫出來了，放在這里和大家分享一下：

%
starttime=cdate("2013-09-08") '項目開始時間
endtime="" '項目結束時間
num=8 '項目需要的天數
response.write "開始時間："starttime"br>天數："num"br>結束時間："
starttime=starttime-1
i=1
while i = num
	starttime=starttime+1
	w=weekday(starttime) 
	if w>1 and w7 then '非周末
		endtime=starttime
		i=i+1	
	else '周末休息
	end if
wend
response.write endtime
%>

(鼠標移到代碼上去，在代碼的頂部會出現四個圖標，第一個是查看源代碼，第二個是復制代碼，第三個是打印代碼，第四個是幫助)
運行一下，即可看到結果。你也可以修改一下里面的項目開始時間和項目天數，再通過萬年歷來比較檢查一下它的計算結果是否正確。