📄 jpud.asp

📁 机票预定系统各个模块的设计-ticket reservation systems detailed design system modules of the design
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--#include file="../manager/function/conn.asp" -->
<%
session("mem_name")=trim(request.cookies("mem_login"))
    if session("mem_name") = "" then
       response.Write "<script language='javascript'>alert('\n\n\n您尚未登陆或已超时\n\n由于本次操作只有会员才能进行，请您返回首页登陆！');</script>"
	   response.Write "<script language='javascript'>MyWindow=window.open('../register/zc.asp','MyWindow','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=265,height=100');</script>"
	   response.Write "<script language='javascript'>window.history.go(-1);</script>"
	   response.end
       end if 
username_bak=trim(session("mem_name"))

sql="select * from tmember where mem_loginname = '"&session("mem_name")&"'"
set rs = server.CreateObject("adodb.recordset")
rs.open sql,conn,3,1
Mem_Name = trim(rs("Mem_Name"))
Mem_Cid = trim(rs("Mem_Cid"))
Mem_Mobile = trim(rs("Mem_Mobile"))
Mem_Tel = trim(rs("Mem_Tel"))
Mem_Fax = trim(rs("Mem_Fax"))
Mem_Email = trim(rs("Mem_Email"))
Mem_Addr = trim(rs("Mem_Addr"))
Mem_zip = trim(rs("Mem_zip"))
Mem_mobile = trim(rs("Mem_mobile"))
Mem_money = trim(rs("Mem_money"))
Mem_id = trim(rs("Mem_id"))

If Request("MM_insert") <> "" Then

cataid = request.form("cataid")
if cataid<>"" then
cataid=cLng(cataid)
end if

tro_ticketnum=cint(request.form("tro_ticketnum"))
counter = cataid * tro_ticketnum

'response.Write Mem_money&"<br>"
'response.Write tro_ticketnum&"<br>"
'response.Write cataid&"<br>"
'response.Write counter
'response.End()
'response.End()

if cLng(trim(counter))>cLng(trim(Mem_money)) then
   response.Write "<script language='javascript'>alert('\n对不起，您的积分不够兑换此奖品！\n\n请返回重新选择！\n');</script>"
   response.Write "<script language='javascript'>window.history.go(-1);</script>"
   response.end
end if

tro_cataid=trim(request.form("cataid"))
tro_name3=trim(request.form("tro_name3"))
tro_code=trim(request.form("tro_code"))
tro_txt=trim(request.form("tro_txt"))
tro_date=trim(request.form("tro_date"))
tro_conent=trim(request.form("tro_conent"))
tro_name=trim(request.form("tro_name"))
tro_tel1=trim(request.form("tro_tel1"))
tro_tel2=trim(request.form("tro_tel2"))
tro_email=trim(request.form("tro_email"))
tro_address=trim(request.form("tro_address"))
tro_pc=trim(request.form("tro_pc"))
tro_remark=trim(request.form("tro_remark"))
orderstate=1
order_code=mem_id&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)
if not isdate(tro_date) then
tro_date=now()
end if

sql="insert into prize(tro_name3,tro_code,tro_txt,tro_date,tro_conent,tro_name,tro_ticketnum,tro_tel1,tro_tel2,tro_email,tro_address,tro_pc,tro_remark,username,orderstate,order_code,YdSxf,TotalPrice2) values('"&tro_name3&"','"&tro_code&"','"&tro_txt&"','"&tro_date&"','"&tro_conent&"','"&tro_name&"','"&tro_ticketnum&"','"&tro_tel1&"','"&tro_tel2&"','"&tro_email&"','"&tro_address&"','"&tro_pc&"','"&tro_remark&"','"&username_bak&"','"&orderstate&"','"&order_code&"','"&tro_cataid&"','"&tro_cataid&"')"
conn.execute(sql)
response.Write "<script language='javascript'>alert('申请递交成功，请等待本公司的回复！');window.location.href='index.asp';</script>"
End If
%>
<!--#include file="../../config.asp"--><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=ZXLCompanyStr%></title>
<link href="RLimages/user.css" rel="stylesheet" type="text/css">
<%
tro_codeid="HY"&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)
%>
<SCRIPT language=javascript>
function check_input()  
{  
	if (form1.tro_Name3.value=="")
	{   alert("奖品名称不能有空，请返回检查！");
		return false;
	}
	if (form1.tro_Name.value=="")
	{   alert("姓名不能有空，请返回检查！");
		return false;
	}
	if (form1.tro_TicketNum.value=="")
	{	
		alert("订数量不能有空，请返回检查！");
		document.form1.tro_TicketNum.focus();
		return false;
	}
	if (form1.tro_Tel1.value=="")
	{   alert("最少要填写一个联系电话，请返回检查！");
		document.form1.tro_Tel1.focus();
		return false;
	}
	if (form1.tro_Address.value=="")
	{   alert("联系地址不能有空，请返回检查！");
		document.form1.tro_Address.focus();
		return false;
	}
	if (form1.tro_codeid.value=="")
	{   alert("订单号不能为空，请返回刷新！");
		return false;
	}
    return true;
}
</SCRIPT>
<style type="text/css">
<!--
.STYLE1 {
	font-size: 14px;
	font-weight: bold;
}
-->
</style>
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<TABLE width=100% border=0 cellPadding=0 cellSpacing=1 id=Table_01>
  <TBODY>
    <TR>
      <TD height=16>&nbsp;</TD>
      <TD vAlign=bottom><table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#999999">
          <tr>
            <td height="10" background="images/images_1.gif" bgcolor="#3592F1" class="b-14"></td>
          </tr>
          <tr>
            <td height="24" align="center" valign="middle" background="images/img_7.gif" class="b-14"><span class="STYLE1">兑奖及其他服务申请预订单</span></td>
          </tr>
        </table></TD>
      <TD>&nbsp;</TD>
    </TR>
    
    <TR>
      <TD height=390 width=1>&nbsp;</TD>
      <TD align=right vAlign=bottom background=RLimages/wsddtj_bg.gif>
		<DIV align=center>
        <FORM action=jpud.asp method=POST name=form1 onSubmit="return check_input()">
          <TABLE bgColor=#999999 border=0 cellPadding=0 cellSpacing=1 
                  class=back-12 width=100%>
            <TBODY>
              <TR align="left">
                <TD height=20 colSpan=2 bgcolor="#ffffff">　以下是您申请预订信息：</TD>
              </TR>
              <TR align=middle vAlign=center>
                <TD width=24% height=25 align="left" bgColor=#FFFFFF>　奖品名称：</TD>
                <TD width=77% height="25" align="left" bgColor=#FFFFFF><FONT 
                        color=#6699ff face=华文行楷>&nbsp;
                        <INPUT name=tro_Name3 class=book 
                        id=tro_Name2 value="<%=request.Form("proname")%>" size=15 maxLength=20>
                </FONT></TD>
                <!--<td rowspan=2 align="center">行程(天)</td>  -->
              </TR>
12 下一页
⌨️ 快捷键说明

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