<%
Response.Buffer = true
weekstr=Array("日","1","2","3","4","5","6")
Nweek = DatePart("w",date() ) -1 '今天是星期几?
output "Nweek=", Nweek
Cweek = weekstr(Nweek)
Output "Cweek=",Cweek
response.Clear
%>
执行后,OUTPUT只是吧数据写入缓冲区,若程序一切正常,则RESPONSE.CLEAR将清除缓冲区,就不会有测试数据在页面上!