zxlordersubmit.asp

机票预定系统 各个模块的设计-ticket reservation systems detailed design system modules of the design

<!--#include file="../manager/function/conn.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
set rs=server.CreateObject("adodb.recordset")

price_bak0=request.form("order_price")		'舱位价格
bunk_bak0=request.form("order_bunk")		'舱位信息,如Y舱,F舱
rebate_bak0=request.form("order_rebate")	'舱位名称,如头等舱
planeType0=request.form("planeType")		'机型,如"待定","733"
num0=request.form("order_num")				'剩余座位数
flightno0=request.form("order_flightno")	'航班号
timefrom0=request.form("order_timefrom")	'起飞时间
timeto0=request.form("order_timeto")		'到达时间
state10=request.form("order_state")			'经停,如"本段直飞"
dining0=request.form("order_dining")		'餐食
QueryDate0=request.form("order_date")		'客户查询哪一天的航班
tag_ticket_bak0=request.form("order_tag")	'冗余数据,可以不管
city_from0=request.form("city_from")		 '起飞城市
city_to0=request.form("city_to")			'到达城市
msg_back0=request.form("msg_back")			'电子票,如支持电子票'则为"电子票"
ZXLCityFlyCode0=request.form("ZXLCityFlyCode") '航段,如深圳到北京,则为"szxpek"
fullprice0=request.Form("fullprice")
airways0=request.form("airways")			'航空公司名

if rebate_bak0="" then rebate_bak0=ReBunk(Ucase(bunk_bak0),left(Ucase(flightno0),2))
%>

<form action="../order_ticket.asp" method="post" name="form1">
<!-- <input type="hidden" name="order_date" value="<%=QueryDate0%>">
<input type="hidden" name="airline_info_from_city" value="<%=city_from0%>">
<input type="hidden" name="airline_info_to_city" value="<%=city_to0%>">
<input type="hidden" name="air_co" value="<%=airways0%>">
<input type="hidden" name="air_plane" value="<%=flightno0%>">
<input type="hidden" name="fromtime" value="<%=timefrom0%>">
<input type="hidden" name="endtime" value="<%=timeto0%>">
<input type="hidden" name="class" value="<%=rebate_bak0%>">
<input type="hidden" name="RealMoney" value="<%=price_bak0%>"> -->
<%if flightno0<>"" then%>
<input type=hidden name="airways" value="<%=ReAirway(Left(Ucase(flightno0),2))%>">
<%End if%>
 <input type=hidden name="planeType" value="<%=planeType0%>">
	   <input type=hidden name="order_flightno" value="<%=Ucase(flightno0)%>">
	   <input type=hidden name="fullprice" value="<%=fullprice0%>">
	   <input type=hidden name="order_timefrom" value="<%=timefrom0%>">
	   <input type=hidden name="order_timeto" value="<%=timeto0%>">
	   <input type=hidden name="order_state" value="<%=state10%>">
	   <input type=hidden name="order_dining" value="<%=dining0%>">
	   <input type=hidden name="order_date" value="<%=QueryDate0%>">
	<!--    <input type=hidden name="order_tag" value=""> -->
	   <input type=hidden name="city_from" value="<%=ReCity(city_from0)%>">
	   <input type=hidden name="city_to" value="<%=ReCity(city_to0)%>">
	   <!-- <input type="hidden" name="msg_back" value="">  -->
	    <input type="hidden" name="order_price" value="<%=price_bak0%>">
	   <input type="hidden" name="order_bunk" value="<%=Ucase(bunk_bak0)%>">
	   <input type="hidden" name="order_rebate" value="<%=rebate_bak0%>">
	   <input type="hidden" name="ZXLCityFlyCode" value="<%=city_from0&city_to0%>">

	   	   <input type="hidden" name="adultNum" value="<%=request("adultNum")%>">
	   	<input type="hidden" name="ChildNum" value="<%=request("ChildNum")%>">
		<input type="hidden" name="BabyNum" value="<%=request("BabyNum")%>">
</form>

<script language="javascript">form1.submit();</script>

<%

function ReCity(TempCity)
	sql="select Cityname from city where citycode='"&TempCity&"'"
	rs.open sql,conn,3,1
	if not (rs.eof or rs.bof) then
		ReCity=rs("cityname")
	else
	    Recity="未知"&rs("cityname")
	end if
	rs.close
end function

function ReAirway(TempAirway)
	sql="select 公司名称 from airways where 公司代号='"&TempAirway&"'"
	rs.open sql,conn,3,1
	if not (rs.eof or rs.bof) then
		ReAirway=rs("公司名称")
	else
	    ReAirway="未知"
	end if
	rs.close
end function
function ReBunk(TempBunk,TempAirway)
    if TempBunk="F" then
	    ReBunk="头等舱"
	elseif TempBunk="C" then
		ReBunk="商务舱"
	elseif TempBunk="Y" then
		ReBunk="公务舱"
	elseif TempBunk="-" then
		ReBunk="特价舱"
	else
		'sql="select  (Cast((100-charindex('"&TempBunk&"',(Isnull(Y95,' ')+Isnull(Y90,' ')+Isnull(Y85,' ')+Isnull(Y80,' ')+Isnull(Y75,' ')+Isnull(Y70,' ')+Isnull(Y65,' ')+Isnull(Y60,' ')+Isnull(Y55,' ')+Isnull(Y50,' ')+Isnull(Y45,' ')+Isnull(Y40,' ')+Isnull(Y35,' ')+Isnull(Y30,' ')+Isnull(Y25,' ')+Isnull(Y20,' ')+Isnull(Y15,' ')+Isnull(Y10,' ')+Isnull(Y05,' ')))*5) as varchar(2))) as bunk from TADiscount where 航空公司='"&TempAirway&"'"
		'response.write sql
		'response.end
		'rs.open sql,conn,3,1
		'if not (rs.eof or rs.bof) then
			'ReBunk=rs("bunk")&"折经济舱"
		'else
		    ReBunk="未知("&TempBunk&")"
		'end if
	'rs.close
	end if
end Function

function ReAirway(TempAirway)
	sql="select 公司名称 from airways where 公司代号='"&TempAirway&"'"
	rs.open sql,conn,3,1
	if not (rs.eof or rs.bof) then
		ReAirway=rs("公司名称")
	else
	    ReAirway="未知"
	end if
	rs.close
end Function

set rs=nothing
call conn_close()
%>