|
|
 |
| |
 |
|
|
| |
<%
set rs=Server.CreateObject("Adodb.Recordset")
Query="select * from Gate where id=1"
rs.cursorlocation=3
Rs.open Query,conn
maxID=Rs.RecordCount
rs.close
Query="select * from Gate order by ID,FloorType"
rs.open query,conn
%>
| |
Available |
| |
Booked |
| |
Reserved |
|
| |
Type |
| Floor |
A
1240 sq.ft. |
B
1240 sq.ft. |
C
1230 sq.ft. |
D
1230 sq.ft. |
<%
cnt=0
while not rs.eof
if cnt=0 then
%>
| <%=Rs("floor")%> |
<% end if
if rs("status")=1 then
color="#F78531"
elseif rs("status")=0 then
color="#ACCE8A"
elseif rs("status")=2 then
color="#92D6FA"
end if
%>
<%=Rs("floortype")%> |
<%
cnt=cnt+1
if cnt=maxID then %>
<%
cnt=0
end if %>
<%
rs.movenext
wend
rs.close
set rs=nothing
set conn=nothing
%>
|
| |
|
|
|
| |
|
|
