📄 admin_add.asp

📁 机票预定系统各个模块的设计-ticket reservation systems detailed design system modules of the design
💻 ASP
字号:
<!--#include file="include/conn.asp"-->
<!--#include file="CheckSystem.asp"-->
<%
call checklimit(session("Limit"),"5")'调用验证管理员权限的函数
response.Clear()
%>
<%
if Request.ServerVariables("REQUEST_METHOD")="POST" then
	Auto=request.form("Auto")
	 flightno=Ucase(trim(request.form("flightno")))
     price=trim(request.form("price"))
	 Num=ReNumA(trim(request.form("Num")))
	 bunk=request.form("bunk")
	 flyDate=request.form("flyDate")
	 endDatetime=request.form("endDatetime")
	 rebate=request.form("rebate")
	 TempifActiveStr="0"
     if trim(request.form("ifActiveStr"))="ON" then
	 	TempifActiveStr="1"
	 end if
	 ifActive=TempifActiveStr
	 ifDynamicBunk=0
	set rs=server.CreateObject("adodb.recordset")
	if request.form("MyAction")<>"AddNew" then
		qsql=" select * from mybunkmessage where auto="&auto&" " 
		rs.open qsql,conn,1,3 
		myActionStr="修改"
	else
		qsql=" select * from mybunkmessage "
		rs.open qsql,conn,1,3
		rs.addnew 
		myActionStr="添加"
	end if
		rs("datetime")=now()
		rs("flightno")=UCase(flightno)
		rs("price")=price
		rs("Num")=Num
		rs("flyDate")=flyDate
		rs("rebate")=rebate
		rs("bunk")=UCase(bunk)
		rs("endDatetime")=endDatetime
		rs("ifActive")=ifActive
		rs("ifDynamicBunk")=0
		rs.update
		rs.close:set rs=nothing
	 response.write "<script language=javascript>alert('记录已经"&myActionStr&"成功!');window.location.href='manage.asp';</script>"
end if
%>
<HTML>
<HEAD>
<TITLE>添加座舱位</TITLE>
<link href="include/css.css" rel="stylesheet" type="text/css">
<link rel="stylesheet" type="text/css" href="style/comm.css" />
<link rel="stylesheet" type="text/css" href="style/skin0.css" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!-- powered By ZhouXiaolong -->
<SCRIPT language=javascript>
<!--
function isFlightNo(s)
		{
			var patrn=/^[a-zA-Z0-9]{2}([0-9]){3,4}$/;
			if (!patrn.exec(s))
				return false;
			else
				return true;
		}
function isBunk(s)
	{
	var patrn=/^[a-zA-Z]{1}$/;
	if(!patrn.exec(s))
		return false;
	else
		return true;
	}
function checkinput()
{

	if (!isFlightNo(Seatform.FlightNo.value)){
		alert("航班号不规范！前两位必须为数字或字母，不区分大小写；后几位必须为数字\n");
		Seatform.FlightNo.focus();
	  return false; 
		}
	    if (Seatform.FlightNo.value.length>6 || Seatform.FlightNo.value.length<5)
	{
	  alert("航班号不规范！航班号长度不对!");
	Seatform.FlightNo.focus();
	  return false; 
        }
	if (Seatform.bunk.value=="")
	{
	  alert("对不起，舱位等级设置不规范，必须为字母!");
	  Seatform.bunk.focus();
	  return false; 
        }
	if (Seatform.flyDate.value=="")
	{
	  alert("起飞日期不能为空!");
	Seatform.flyDate.focus();
	  return false; 
        }
     if (isNaN(Seatform.num.value))
	{
	  alert("座位数必须是数字!");
	Seatform.num.focus();
	  return false; 
        }
	if (isNaN(Seatform.price.value))
    	{
       		alert("价格必须是数字!");	  
		Seatform.price.focus();
       		return false; 
     	} 	
		//-->
}
</SCRIPT>
<script language="javascript" src="include/newjs/calendar.js"></script>
</head>
<body>
<div class="txt_title">添加静态航班特价（用途：针对航班的舱位特价政策，可自定义剩余座位数）</div>
<%
auto=request("auto")
myActionStr="添加"
ifActiveStr="checked"
ifDynamicBunkStr="checked"
flyDate=date+1
endDatetime=date+2
if auto<>"" then
	 dim szSQL
     set oRst=Server.CreateObject("AdoDb.recordset")
	 szSQL="select * from myBunkmessage where ifDynamicBunk=0 and auto="&auto
    oRst.Open szSQL,conn,3,1
	if not(oRst.eof or oRst.bof) then
    			if oRst("ifActive")<>"1" then
				ifActiveStr=""
				end if
			   ' fontColor=oRst("fontColor")
                ifActive=oRst("ifActive")
				ifDynamicBunk=0
				FlightNo=oRst("FlightNo")
                flyDate=oRst("flyDate")
				rebate=oRst("Rebate")
				num=ReNumA(oRst("Num"))
				price=oRst("Price")
				bunk=oRst("bunk")
	            'fullprice=oRst("fullprice")
				datetime=oRst("DateTime")
				endDatetime=oRst("endDatetime")
				'Auto=oRst("Auto")
	end if
myActionStr="更新"
oRst.close
set oRst=nothing
end if
if num="" then num="9"
if flyDate="" then flyDate="1"
if endDatetime="" then endDatetime="1"
if rebate="" then rebate="特价舱"
%>
<table cellpadding="0" cellspacing="1">
 <form action="admin_add.asp" method="post" name="Seatform" onSubmit="return checkinput();">
 <%if auto="" then%>
   <input type="hidden" name="MyAction" value="AddNew">
 <%end if%>
 <input type="hidden" name="Auto" value="<%=auto%>">
  <tr bgcolor="#C3E7F9">
    <td width="16%" height="25" align="right" bgcolor="#FFFFFF">航班号:</td>
    <td width="34%" bgcolor="#FFFFFF"><input name="FlightNo" type="text" style="width:100px" value="<%=FlightNo%>" maxlength="6"></td>
    <td width="50%" bgcolor="#FFFFFF">输入相应航班号</td>
    </tr>
	<tr>
	  <td height="25" align="right" bgcolor="#FFFFFF">航班有效日期:</td>
	  <td  bgcolor="#FFFFFF"><input name="flyDate" type="text"  value="<%=flyDate%>" size="10" maxlength="15"   onClick=javascript:calendar(); >-->
      <input name="endDatetime" type="text" value="<%=enddatetime%>"  size="10" maxlength="15"  onClick=javascript:calendar(); ></td>
	  <td bgcolor="#FFFFFF">&nbsp;</td>
    </tr>
	<tr>
	  <td height="25" align="right" bgcolor="#FFFFFF">舱位名称:</td>
	  <td  bgcolor="#FFFFFF"><input name="Rebate" type="text" id="Rebate" style="width:100px" value="<%=rebate%>" size="6" maxlength="6"></td>
	  <td bgcolor="#FFFFFF">如：特价舱，30折经济舱等</td>
    </tr>
	<tr>
	  <td height="25" align="right" bgcolor="#FFFFFF">舱位等级:</td>
	  <td  bgcolor="#FFFFFF"><input name="bunk" type="text" id="bunk"  value="<%=bunk%>" size="8" maxlength="1"></td>
	  <td bgcolor="#FFFFFF">如：A,Y,C等</td>
    </tr>
	<tr>
	  <td height="25" align="right" bgcolor="#FFFFFF">座位数:</td>
	  <td  bgcolor="#FFFFFF"><input name="num" type="text" style="width:30px" value="<%=Num%>"></td>
	  <td bgcolor="#FFFFFF">&nbsp;</td>
    </tr>
	<tr>
	  <td height="25" align="right" bgcolor="#FFFFFF">折扣:</td>
	  <td  bgcolor="#FFFFFF"><input name="price" type="text" id="price" value="<%if price<>"" then response.Write(price) else response.Write(0) end if%>" size="6" maxlength="4"></td>
	  <td bgcolor="#FFFFFF">如：25，30，40，50等</td>
    </tr>
	<tr>
	  <td height="25" align="right" bgcolor="#FFFFFF">有效:</td>
	  <td bgcolor="#FFFFFF"><input name="ifActiveStr" type="checkbox" value="ON" <%=ifActiveStr%>></td>
	  <td bgcolor="#FFFFFF">&nbsp;</td>
    </tr>
	<tr>
	  <td height="30" colspan="3" align="center" bgcolor="#FFFFFF">
	    <input type="submit" value=" 确 认 " name="addRow">&nbsp;&nbsp;
      <input type="button" value=" 返 回 " name="CancelRow"  onClick="javascript:window.history.back();"></td>
  </tr>
  </form>
</table>
</BODY>
</HTML>
<%
function ReNum(i)
	if i="9" then 
		ReNum="A"
	else
		ReNum=i
	end if
end function
function ReNumA(str)
		ReNumA=str
	if str="A" or str="a" then 
		ReNumA="9"
	end if
end function
%>
💿 文件大小 2978 K
👤 上传用户 x184372250
📂 所属分类电子书籍
🏷️ 相关标签

#design #reservation #detailed #modules
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -