|
<%
dayofweek = weekday(now())
timeofday = time()
'set cutoff times
if dayofweek >= 2 and dayofweek <= 5 then
cutoff = TimeSerial("16", "00", "00")
elseif dayofweek = 6 then
cutoff = TimeSerial("14", "00", "00")
else
cutoff = TimeSerial("11", "00", "00")
end if
' **** addendum
cutoff = TimeSerial("17", "00", "00")
if timeofday > cutoff then
'add a day
dateout = DateAdd("d", 2, date())
else
dateout = DateAdd("d", 1, date())
end if
%>
|

|