tuifang.asp

来自「随着计算机技术的广泛应用,在酒店客房管理中引入计算机管理技术,成为一个值得深入研」· ASP 代码 · 共 19 行

<!--#include file="../inc/conn.asp"-->
<!--#include file="checkpwd.asp"-->
<!--#include file="../inc/title.inc"-->
<%
roomid=request.Form("roomid")
fangjh=request.Form("fangjh")
ddhao=request.Form("ddhao")
'response.Write(roomid)
sql1="update [fj] set ztai=false where roomname='"&fangjh&"'"
conn.execute(sql1)
sql2="select * from [room] where roomnam='"&roomid&"'"
set rs2=conn.execute(sql2)
lnum1=rs2("lnum")+1
sql3="update room set lnum='"&lnum1&"' where roomnam='"&roomid&"'"
conn.execute(sql3)
sql4="update [book] set fangjh='已退房!',ltime=now() where num='"&ddhao&"'"
conn.execute(sql4)
conn.close
%>