Time() range

[le0]

Hello Guys,

I have this dropdown box and the options is TimeShift (6a-2pm, 2p-10p, 10p-6a ), im getting this data in a table (Acess DB) . My problem is how can i display (option selected) the actual shift based on the actual time.

Code:

<td width="100" height="5"><select size="1" name="ddShift">

<%Do While Not rstShift.EOF%>
<option value="<%=rstShift.Fields("ShiftID").Value%>"><%=r stShift.Fields("Shift").Value%></option>
<%
rstShift.Movenext
Loop
%>

or can i do it manually, but the problem is the <Condition statement>, im using "Between" like querying a date range in a database but it doesnt work. How can i get the range in Time()? Please Helpppp...

<%if <Condition then%>
<option selected value="A"><%="6am-2pm"%></option>
<%end if%>

btw im using Frontpage and ASP Classic

[Mike Brind]

le0 wrote:

Hello Guys,

I have this dropdown box and the options is TimeShift (6a-2pm, 2p-10p, 10p-6a ), im getting this data in a table (Acess DB) . My problem is how can i display (option selected) the actual shift based on the actual time.

Code:

<td width="100" height="5"><select size="1" name="ddShift">

<%Do While Not rstShift.EOF%>
<option value="<%=rstShift.Fields("ShiftID").Value%>"><%=r stShift.Fields("Shift").Value%></option>
<%
rstShift.Movenext
Loop
%>

or can i do it manually, but the problem is the <Condition statement>, im using "Between" like querying a date range in a database but it doesnt work. How can i get the range in Time()? Please Helpppp...

<%if <Condition then%>
<option selected value="A"><%="6am-2pm"%></option>
<%end if%>

btw im using Frontpage and ASP Classic

<%
Dim shift
shift=""
If DatePart("h", Now()) 5 And DatePart("h", Now()) < 14 Then shift =
" selected"
If DatePart("h", Now()) 13 And DatePart("h", Now()) < 22 Then shift =
" selected"
If DatePart("h", Now()) 21 Or DatePart("h", Now()) < 6 Then shift = "
selected"
%>

<option value="A" <%=shift%>>6am-2pm</option>
<option value="B" <%=shift%>>2pm-10pm</option>
<option value="C" <%=shift%>>10pm-6am</option>

--
Mike Brind

[le0]

Hey Mike thanks =)
I really apreciate that =)

"Mike Brind" <pa*******@hotmail.comwrote in message
news:11**********************@m73g2000cwd.googlegr oups.com...

>
le0 wrote:

>Hello Guys,

I have this dropdown box and the options is TimeShift (6a-2pm, 2p-10p,
10p-6a ), im getting this data in a table (Acess DB) . My problem is how
can i display (option selected) the actual shift based on the actual
time.

Code:

<td width="100" height="5"><select size="1" name="ddShift">

<%Do While Not rstShift.EOF%>
<option
value="<%=rstShift.Fields("ShiftID").Value%>"><%= rstShift.Fields("Shift").Value%></option>
<%
rstShift.Movenext
Loop
%>

or can i do it manually, but the problem is the <Condition statement>, im
using "Between" like querying a date range in a database but it doesnt
work. How can i get the range in Time()? Please Helpppp...

<%if <Condition then%>
<option selected value="A"><%="6am-2pm"%></option>
<%end if%>

btw im using Frontpage and ASP Classic

<%
Dim shift
shift=""
If DatePart("h", Now()) 5 And DatePart("h", Now()) < 14 Then shift =
" selected"
If DatePart("h", Now()) 13 And DatePart("h", Now()) < 22 Then shift =
" selected"
If DatePart("h", Now()) 21 Or DatePart("h", Now()) < 6 Then shift = "
selected"
%>

<option value="A" <%=shift%>>6am-2pm</option>
<option value="B" <%=shift%>>2pm-10pm</option>
<option value="C" <%=shift%>>10pm-6am</option>

--
Mike Brind