looping, WHAT DO YOU WANT FOR CHRISTMAS?

Excellent!

"Kyle" <kfinch@bayoucitygroup.com> wrote in message
news:3ed76d10$1@tnews.web.dev-archive.com...
>
> WORKING PERFECTLY!!! THANKS FOR ALL YOUR HELP. THIS DID IT...
> ****************************************************************
> Set rstTimes = Server.CreateObject("ADODB.Recordset")
> strSQL = "Select dat.AvailableTime, ad.AppTime From (DaysAndTimes dat
Left
> Outer Join AppDetails ad on dat.AvailableTime = ad.AppTime" &_
> " and ad.AppDate = '" & request.querystring("queryDate") & "') " &_
> " where dat.TODAY = '" & request.querystring("queryDay") & "'"
> rstTimes.Open strSQL, DBConn
> If Not isEmpty(rstTimes("AppTime")) Then
> TheMessage1 = "--TIME UNAVAILABLE--"
> End If
>
> <%
> do until rstTimes.EOF
> %>
> <TR><form method="post" id="form1" name="form1">
> <% If (rstTimes("AppTime") = (rstTimes("AvailableTime"))) Then %>
> <TD width="75" align="middle" height="30"><% Response.Write
rstTimes("AvailableTime")
> %></TD>
> <TD width="450" height="30"><% Response.Write TheMessage1%>
> <% Else %><TD width="75" align="middle" height="30"><% Response.Write
rstTimes("AvailableTime")
> %></TD>
> <TD width="450" height="30"><INPUT id="Text1" type="text"
name="Text1">
> <IMG height="1" src="i/clear.gif" width="20">
> <IMG height="1" src="i/clear.gif" width="15"> <INPUT id="Submit2"
type="submit"
> value="Submit" name="Submit2">
> <IMG height="1" src="i/clear.gif" width="20">SELECT THIS TIME</TD>
> <% End If %></TD>
> </form></TR>
> <%
> rstTimes.MoveNext
> loop
> %>
> ****************************************************************