?? chuanjinafj.asp
字號(hào):
<!--#include file="../inc/conn.asp"-->
<!--#include file="checkpwd.asp"-->
<!--#include file="../inc/title.inc"-->
<style>
TD {
FONT-SIZE: 9pt
; color: #000000
}
</style>
<%
i=1
id=request("id")
sqlchk="select * from [fj] where roomlei="&id
set chkrs=conn.execute(sqlchk)
do while not chkrs.eof
i=i+1
chkrs.movenext
loop
'response.Write(i)
sql1="select * from room where id="&id
'sql2="select * from "
set rs1=conn.execute(sql1)
x=int(trim(rs1("totnum")))'10
y=i'11
'response.Write y>x
'response.Write rs1("totnum")
if y>x then
Response.Write("<script>alert(""此類房已全部被設(shè)置！"");location.href=""room.asp"";</script>")
else
%>
<table width="788" border="0" cellpadding="0" cellspacing="1">
<!--DWLayoutTable-->
<tr>
<td width="786" height="59"> </td>
</tr>
<tr>
<td height="510" 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 width="784" height="23" align="center" valign="middle" bgcolor="#3333CC"><font color="#FFFFFF" face="楷體_GB2312"><strong>創(chuàng)建房間</strong></font></td>
</tr>
<tr>
<td height="88" valign="top"> <form action="add_fangjian.asp" method="post" >
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#3333CC">
<!--DWLayoutTable-->
<tr>
<td height="20" colspan="2" valign="middle" background="imgs/tile_sub.gif"><strong><font color="#FFFFFF">房間信息</font></strong></td>
</tr>
<tr>
<td width="181" height="20" align="center" valign="middle" bgcolor="#FFFFFF">房間類型：</td>
<td width="600" valign="middle" bgcolor="#FFFFFF"><font color="#FF0000"><%=rs1("roomnam")%>
<input name="hiddenField" type="hidden" value="<%=id%>">
</font></td>
</tr>
<tr>
<td height="20" align="center" valign="middle" bgcolor="#FFFFFF">請(qǐng)輸入房間號(hào)：</td>
<td valign="top" bgcolor="#FFFFFF"><input name="fanghao2" type="text" id="fanghao2">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="21" colspan="2" valign="top"> <input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="1"></td>
<td></td>
</tr>
</table>
</form></td>
</tr>
<tr>
<td height="32"> </td>
</tr>
<tr>
<td height="279" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td height="26" colspan="2" align="center" valign="middle"background="imgs/tile_sub.gif"><font color="#FFFFFF"><strong>查詢房間</strong></font></td>
</tr>
<tr>
<td height="14" colspan="2" valign="top"><font color="#FF0000">用于查詢?cè)O(shè)置的房間是否被設(shè)置為其他客房類型！</font></td>
</tr>
<tr>
<td width="747" height="38"> </td>
<td width="37"> </td>
</tr>
<tr>
<td height="195" colspan="2" valign="top">
<% fanghao=request.Form("fanghao")
sql2="select * from [fj] where roomname='"&fanghao&"'"
set rs2=conn.execute(sql2)
'response.Write rs2("roomname")
if rs2.eof then
flage=true'未被設(shè)置
else
flage=flase'設(shè)置
end if
%>
<form action="" method="post">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="83" height="23" valign="top">輸入房號(hào)：</td>
<td colspan="4" valign="top"><input name="fanghao" type="text" id="fanghao"></td>
</tr>
<tr>
<td height="21"> </td>
<td width="32"> </td>
<td width="54"> </td>
<td width="406"> </td>
<td width="209"> </td>
</tr>
<tr>
<td height="21"> </td>
<td> </td>
<td valign="top"><input type="submit" name="Submit3" value="提交"></td>
<td> </td>
<td> </td>
</tr>
<tr>
<td height="35"> </td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="20" valign="top">房間狀態(tài)：</td>
<td colspan="3" valign="top"> <font color="#FF0000">
<%
if flage then
response.Write("未被設(shè)置任何房間類型")
else
response.Write("房間被設(shè)置")
end if
%>
</font></td>
<td> </td>
</tr>
<tr>
<td height="38"> </td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
</table>
</form></td>
</tr>
<tr>
<td height="80"></td>
<td> </td>
</tr>
<tr>
<td height="12"></td>
<td valign="top"><a href="room.asp">返回</a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="43"> </td>
</tr>
</table>
<%end if%>?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -