非常谢谢楼上的朋友,用你的我试了一下,周六也有,我加了一个条件:
<%
dim a(3),d,s,wk
a(0)="a"
a(1)="b"
a(2)="c"
a(3)="d"
wk=(weekday(now()))
d="2008-08-25"
s=datediff("d",d,date())
if (wk>1 and wk<7) then
s= (s - (s \ 7) * 2) mod 4
response.write a(s)
end if
%>
调整了一下时间进行验证,8.25为a,8.26为b,8.27为c,8.28为d,8.29为a,8.30,8.31没有显示,9.1日为b,看来是成功了,再次感谢你!
顺便问一下,如果人数有改变,结果会不会有变化?
[[it] 本帖最后由 cbtxgt 于 2008-8-29 11:39 编辑 [/it]]