asp如何指定星期几，具体时间开启某个功能

<%
'获取星期函数
function getWeekDay()
txx=weekday(now-1)
tstr=""
select case txx
case 1: tstr="一"
case 2: tstr="二"
case 3: tstr="三"
case 4: tstr="四"
case 5: tstr="五"
case 6: tstr="六"
case 7: tstr="日"
end select

getWeekDay=tstr
end function

dim a '定义a 变量 这个变量从星期四21点存活到星期五 23点
'判断是否是星期四的21点
if getWeekDay()="四" and hour(now())>="21" then a=1 '开始可以报名了

'判断是否是星期五 23点
if getWeekDay()="五" and hour(now())>="23" then a=0 '关闭报名

if a=1 then
...'开启报名
...
...
elseif a=0 then
...'关闭报名
...
else
response.write "你访问的时间不对"
end if

'我已经测试通过了 有问题可以联系我
%>

你的问题其实就是如何判断时间段的问题，当用户登陆时取得当前的系统时间，然后跟设定的时间进行比较，如果处于你设定的时间之间，那么