?? kefangxiangqing.asp
字號:
<!--#include file="../inc/conn.asp"-->
<!--#include file="checkpwd.asp"-->
<!--#include file="../inc/title.inc"-->
<style>
TD {
FONT-SIZE: 9pt
; color: #000000
}
</style>
<%
roomlid=request("id")
'response.Write(roomlid)
sql1="select * from [room] where id="&roomlid
'response.Write(sql2)
set rs1=conn.execute(sql1)
rs1room=rs1("roomnam")
'response.Write(rs1room)
%>
<table width="788" border="0" cellpadding="0" cellspacing="1">
<!--DWLayoutTable-->
<tr>
<td width="786" height="59"> </td>
</tr>
<tr>
<td height="422" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#3399FF">
<!--DWLayoutTable-->
<tr>
<td width="784" height="422" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<!--DWLayoutTable-->
<tr>
<td height="23" colspan="6" align="center" valign="middle" bgcolor="#3333CC"><font color="#FFFFFF" face="楷體_GB2312"><strong>客房詳情查詢</strong></font></td>
</tr>
<tr>
<td width="218" height="39"> </td>
<td width="117"> </td>
<td width="123"> </td>
<td width="136"> </td>
<td width="54"> </td>
<td width="136"> </td>
</tr>
<tr>
<td height="24"> </td>
<td valign="middle" align="center"background="imgs/tile_sub.gif">
<font color="#FFFFFF"><strong>房間類型</strong></font> </td>
<td valign="middle" align="center"background="imgs/tile_sub.gif"><strong><font color="#FFFFFF">房間號</font></strong></td>
<td valign="middle" align="center"background="imgs/tile_sub.gif"><font color="#FFFFFF"><strong>狀態</strong></font></td>
<td valign="middle" align="center"background="imgs/tile_sub.gif"><font color="#FFFFFF"><strong>訂房</strong></font></td>
<td> </td>
</tr>
<tr>
<td height="80"> </td>
<td colspan="4" valign="top">
<%
sql2="select * from [fj] where roomlei="&roomlid&""
'sql2="select * from [fj] where roomlei='"&roomlid&"'"
set rs2=server.CreateObject("adodb.recordset")
'set rs2=conn.execute(sql2)
rs2.open sql2,conn,1,1
'response.Write("123")
'response.Write rs2("roomname")
'response.Write(sql2)
'response.End()
do while not rs2.eof
%>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#0000FF">
<!--DWLayoutTable-->
<tr>
<td width="110" height="42" align="center" valign="middle" bgcolor="#FFFFFF"><%=rs1room%></td>
<td width="126" align="center" valign="middle" bgcolor="#FFFFFF"><%=rs2("roomname")%></td>
<td width="138" align="center" valign="middle" bgcolor="#FFFFFF">
<%
if rs2("ztai")=true then
response.Write("被定")
else
response.Write("未被定")
end if
%>
</td>
<td width="48" valign="middle" align="center" bgcolor="#FFFFFF">
<% if rs2("ztai")=false then %>
<a href="book.asp?roomname=<%=rs2("roomname")%>&roomid=<%=rs1room%>">
確定</a>
<% else %>
確定
<% end if%>
</td>
</tr>
</table>
<%
rs2.movenext
loop
%>
</td>
<td> </td>
</tr>
<tr>
<td height="573"> </td>
<td> </td>
<td> </td>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td height="30" colspan="6" align="right" valign="top"bgcolor="#3333CC"><font color="#FFFFFF">2007-9</font></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="43"> </td>
</tr>
</table>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -