addbook.asp

随着计算机技术的广泛应用,在酒店客房管理中引入计算机管理技术,成为一个值得深入研究的问题。本系统采用ASP+ACCESS作为开发环境,本文首先概要的论述了ASP的有关知识与现状。之后

<!--#include file="../inc/conn.asp"-->
<!--#include file="checkpwd.asp"-->
<!--#include file="../inc/title.inc"-->
<%
nam=request.Form("nam")'姓名
sex=request.Form("sex")'性别
'response.Write sex
eage=request.Form("eage")'年龄
cn=request.Form("cn")'身份证明
zhengjianh=request.Form("zhengjianh")'证件号
guoji=request.Form("guoji")'国籍
danwei=request.Form("danwei")'单位
radiobutton=request.Form("radiobutton")'房间确定与否
response.Write radiobutton
if radiobutton then 
chk=true
else
chk=false
end if
yea=request.Form("yea")'
mont=request.Form("mont")'
dat=request.Form("dat")'
renshu=request.Form("renshu")'人数
num=request.Form("hiddenField")'订单号
response.Write num
roomid=request.Form("roomid")'房间类型
tel=request.Form("tel")'电话号
roomid=request.Form("roomid")'
roomnum=request.Form("roomnum")'房间数
'fangjianhao=request.Form("fangjianhao")'
dtime=now()
ltime=yea&"-"&mont&"-"& dat
'response.Write("世界")
'response.Write ltime
textarea=request.Form("textarea")'其他要求
fangjianhao=request.Form("fangjianhao")'房间号
sql1="insert into [book] (nam ,sex  ,eage  ,cn , zhengjianh  ,guoji , danwei  , renshu ,num  ,tel , roomid  ,roomnum,dtime,ltime,other,chk,fangjh) values('"&nam&"','"&sex&"','"&eage&"','"&cn&"','"&zhengjianh&"','"&guoji&"','"&danwei&"','"&renshu&"','"&num&"','"&tel&"','"&roomid&"','"&roomnum&"','"&dtime&"','"&ltime&"','"&textarea&"',"&chk&",'"&fangjianhao&"')"
'response.Write(sql1)
conn.execute(sql1)
'conn.close
sql2="update [fj] set ztai=true where roomname='"&fangjianhao&"'"
'response.Write(sql2)
conn.execute(sql2)
sql3="select * from [room] where roomnam='"&roomid&"'"
set rs3=conn.execute(sql3)
lnum1=rs3("lnum")-1
'response.Write(lnum1)
sql4="update [room] set lnum='"&lnum1&"' where roomnam='"&roomid&"'"
'response.Write(sql4)
conn.execute(sql4)
conn.close
response.Redirect("room.asp")
%>