<%
 Response.Buffer=True
 %>
<HTML>
<BODY>
<%
'获取系统当前时间
CurrentH = Hour(Now())
'获取系统当前星期
CurrentW = WeekDay(Now())
'判断是否为工作时间
If CurrentH >= 8 and CurrentH <= 18 and CurrentW>=2 and CurrentW<=6 Then
   Response.Redirect "working.htm"
Else
   Response.Redirect "stop.htm"  
End If
%>
</BODY>
</HTML>
